Starten met een blanco formulier

[Geertvdb]

Ik heb de volgende vraag:
Ik heb een formulier waar o.a. NAWgegevens ingevuld worden en opgeslagen in een tabel.
Hoe krijg ik het nu voorelkaar dat wanneer ik het formulier opnieuw opstart dat niet met de eerste alfabetische naam gestart wordt maar met een blanco invulscherm.

Geert

 

[Bakk4318]

Gebruik bij het openen van het formulier de volgende code.

DoCmd.GoToRecord , , acNewRec

Je kunt ook de eigenschap "Gegevensinvoer" van het formulier instellen op "Ja".

Hangt er dus vanaf hoe en waar je het wilt gebruiken. Dus een duidelijke uitleg wat je in welke situatie wilt, maakt het beantwoorden gemakkelijker.

 

[Geertvdb]

Charles bedankt voor je antwoord

Ik heb via gebeurtenis in het veld achternaam (vvor bijwerken) de code
DoCmd.GoToRecord , , acNewRec gezet maar zonder het gewenste resultaat.

Je 2de aanwijzing kan ik niet vinden bij eigenschappen
Gegevensinvoer van het formulier instellen op "Ja".

Het gewenste effect is dat bij het openen van het formulier alle velden blanco zijn.

Geert

 

[OctaFish]

De tweede optie vind je bij Formuliereigenschappen, op het tabblad <Gegevens>.
Om snel bij de formuliereigenschappen te komen: dubbelklikken op het donkergrijze deel in het formulierontwerp. (dat is dus onder of naast het formuliergedeelte).

Michel

 

[Geertvdb]

Michel,

Hoe ik bij eigenschappen kom was mij wel duidelijk maar ik kan "Gegevensinvoer van het formulier instellen op Ja" daar niet vinden.

Geert

 

[Bakk4318]

Geert,

Wat ik bedoel is geef stap voor stap weer wat er gebeuren moet. En dat in Jip en Janneke taal. Zo krijg je een oplossing die het meest op maat is.

Bijvoorbeeld:
1. Ik heb nu een schakelbord geopend
2. Hier staat een knop en als ik er op klik moet er een formulier geopend worden
3 Het formulier moet geopend worden met lege invoer velden.
etc. etc.

Wordt je formulier alleen gebruikt om geopend te worden met lege invoervelden, dan kun je het regelen door de eigenschap "Gegevensinvoer" van tabblad "Gegevens" op ja te zetten. Zie afbeelding in de bijlage. Wel "Nee" even op "Ja" zetten natuurlijk.

Wil je het formulier ook gebruiken om records te wijzigen bijvoorbeeld, dan moet je het via VBA code doen. Zie onderstaand voorbeeld:

Private Sub Knop0_Click()
On Error GoTo Err_Knop0_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "Werknemersdetails"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    DoCmd.GoToRecord , [COLOR="Red"], acNewRec[/COLOR]

Exit_Knop0_Click:
    Exit Sub

Err_Knop0_Click:
    MsgBox Err.Description
    Resume Exit_Knop0_Click
    
End Sub

Het rode gedeelte kun je dan aanpassen naar de onderstaande optie's

acFirst
acGoto
acLast
acNewRec
acNext
acPreview

 

[Geertvdb]

Charles

Bedankt voor je duidelijk voorbeeld ik heb de VBA code gebruikt.
En het gewenste resultaat is bereikt.

Geert