In deze zelfstudie leren we hoe u Access-formulieren opent of sluit met VBA.
Een toegangsformulier openen
Gebruik de methode DoCmd.OpenForm om een formulier in Access te openen:
DoCmd.OpenForm "AccessForm"
Dit opent het formulier met de naam "AccessForm":
AccessForm weergegeven in navigatiedeelvenster
Formulier openen met criteria
Deze code opent een formulier in Access met specifieke criteria:
DoCmd.OpenForm "AccessForm", acNormal, , "ID=10"
DoCmd.OpenForm-syntaxis
De volledige syntaxis van de methode is:
DoCmd.OpenForm(NameOfForm, FormView, Filternaam, Waarvoorwaarde, Gegevensmodus, Raam modus, OpenArgs) waar:
| Parameter | Beschrijving |
|---|---|
| NaamVanForm | Vereist en is de naam van het formulier dat u wilt openen. |
| FormView | Optioneel en stelt u in staat om de weergave van het formulier te specificeren. Dit kan zijn: acDesign, acFormDS, acFormPivotChart, acFormPivotTable, acLayout, acNormal, acLayout of acPreview. De standaardwaarde is acNormal. |
| Filternaam | Optioneel en stelt u in staat de naam van een query of SQL-tekenreeks op te geven om als filter te gebruiken. |
| Waarvoorwaarde | Optioneel en stelt u in staat om een zoekopdracht van het type waar uit te voeren zonder het woord waar te gebruiken. |
| Gegevensmodus | Optioneel en stelt u in staat uw gegevensinvoermodus te specificeren. Dit kan zijn: acFormAdd, acFormEdit, acFormPropertySettings of acFormReadOnly. De standaardwaarde is acFormPropertySettings. |
| Raam modus | Optioneel en stelt de weergave van de venstermodus in. Dit kan zijn: acDialog, acHidden, acIcon, acWindowNormal. De standaardwaarde is acWindowNormal. |
| OpenArgs | Optioneel kan worden vermeld in macro's en expressies. |
VBA-programmering | Code Generator werkt voor u!
Een formulier sluiten in Access
Gebruik DoCmd.Close om een open formulier te sluiten:
DoCmd.Close acForm, "AccessForm"
Formulier sluiten en opslaan
Deze VBA-code sluit een Access-formulier en slaat het op:
DoCmd.Sluit acForm, "AccessForm", acSaveYes
Vragen voordat het formulier wordt gesloten
Deze procedure zal de gebruiker vragen voordat een formulier wordt gesloten:
Public Sub CloseFormWithConfirmation(FormName As String) If MsgBox("Weet u zeker dat u dit venster wilt sluiten?", vbYesNo + vbQuestion, "Confirmation") = vbYes Then DoCmd.Close acForm, FormName End If End Sub
Je kunt het zo noemen:
Private Sub CloseFormWithConfirmation_Example() Roep CloseFormWithConfirmation("AccessForm") End Sub aan
Moe van het zoeken naar voorbeelden van VBA-codes? Probeer AutoMacro!
DoCmd.Close Syntaxis
De volledige syntaxis van de methode is:
DoCmd.Close (Object type, Objectnaam, ObjectOpslaan) waar:
| Parameter | Beschrijving |
|---|---|
| Object type | Optioneel en dit is het type object dat u wilt sluiten. Dit kan een formulier zijn of een rapport etc. |
| Objectnaam | Optioneel en is de naam van het object dat u wilt sluiten. |
| ObjectOpslaan | Optioneel en wordt gebruikt om aan te geven of u de gemaakte wijzigingen wilt opslaan. |
