Formulier sluiten code werkt niet

[remcop1989]

Ik gebruik de volgende code om met een knop een formulier te sluiten, maar dit werkt niet. De doet niets:

Private Sub Knop6_Click()
    DoCmd.Close acForm, "Klantdetails", acSaveYes
End Sub

 

[OctaFish]

En die knop staat op het formulier Klantdetails?

 

[remcop1989]

Jawohl

 

[OctaFish]

Intypen van een formuliernaam mag uiteraard, maar als je een generieke code gebruikt weet je zeker dat je nooit meer een typfout maakt:

    DoCmd.Close acForm, Me.Form.Name, acSaveYes

Maar in het geval je geen typfout hebt gemaakt, zou de code natuurlijk gewoon moeten werken. Controleer of de gebeurtenis wel is gekoppeld aan de eigenschap <Bij Klikken> van de knop. Die wil dat wil namelijk nog wel eens kwijtraken, bijvoorbeeld als je de knop een andere naam geeft (wat natuurlijk zou moeten; de naam Knop6 is volkomen nietszeggend. Een knop zou in zijn naam al de functie moeten hebben, dus cmdSluiten is een heel stuk logischer). Een knop verliest zijn connectie ook als je hem van de koptekst naar de voettekst verplaatst.

 

[remcop1989]

Type-foutje toch was formulier "klanten" en niet "klantdetails"

 

[OctaFish]

Des te meer reden om mijn generieke code te gebruiken