Ik heb een formulier met daarop een combobox met aanwezige rangen. Ernaast zit een knop genaamd 'Creëer Rang" met de volgende code daarachter:
Deze werkt naar behoren, alleen er zit ook een knop 'Verwijder Rang' op het formulier, maar ik krijg deze niet werken, Ik had het met een ingesloten macro gedaan maar dat werkt niet, is er ook zo'n stukje code te bedenken daarvoor?
code:
1
2
3
| Private Sub NieuweRang_Click()
DoCmd.OpenForm "frmNieuweRang", , , , acFormAdd
End Sub |
Deze werkt naar behoren, alleen er zit ook een knop 'Verwijder Rang' op het formulier, maar ik krijg deze niet werken, Ik had het met een ingesloten macro gedaan maar dat werkt niet, is er ook zo'n stukje code te bedenken daarvoor?