In questo tutorial impareremo come aprire o chiudere i moduli di accesso utilizzando VBA.
Apertura di un modulo di accesso
Per aprire un form in Access, usa il metodo DoCmd.OpenForm:
DoCmd.OpenForm "AccessForm"
Questo aprirà il modulo denominato "AccessForm":
Form di accesso mostrato nel riquadro di navigazione
Modulo aperto con criteri
Questo codice aprirà un modulo in Access con criteri specifici:
DoCmd.OpenForm "AccessForm", acNormal, , "ID=10"
Sintassi DoCmd.OpenForm
La sintassi completa del metodo è:
DoCmd.OpenForm(NameOfForm, FormView, NomeFiltro, DoveCondizione, Modalità dati, Modalità finestra, OpenArgs) dove:
| Parametro | Descrizione |
|---|---|
| Nome del modulo | Obbligatorio ed è il nome del modulo che si desidera aprire. |
| FormView | Facoltativo e consente di specificare la visualizzazione del modulo. Può essere: acDesign, acFormDS, acFormPivotChart, acFormPivotTable, acLayout, acNormal, acLayout o acPreview. L'impostazione predefinita è normale. |
| NomeFiltro | Facoltativo e consente di specificare il nome di una query o di una stringa SQL da utilizzare come filtro. |
| DoveCondizione | Facoltativo e consente di eseguire una query di tipo where senza utilizzare la parola where. |
| Modalità dati | Facoltativo e consente di specificare la modalità di inserimento dei dati. Può essere: acFormAdd, acFormEdit, acFormPropertySettings o acFormReadOnly. Il valore predefinito è acFormPropertySettings. |
| Modalità finestra | Opzionale e imposta la visualizzazione della modalità Finestra. Può essere: acDialog, acHidden, acIcon, acWindowNormal. L'impostazione predefinita è acWindowNormal. |
| OpenArgs | Facoltativo può essere indicato in macro ed espressioni. |
Programmazione VBA | Il generatore di codice funziona per te!
Chiudi un modulo in Access
Utilizzare DoCmd.Close per chiudere un modulo aperto:
DoCmd.Close acForm, "AccessForm"
Chiudi modulo e salva
Questo codice VBA chiuderà e salverà un modulo di accesso:
DoCmd.Close acForm, "AccessForm", acSaveSì
Richiedi prima di chiudere il modulo
Questa procedura chiederà all'utente prima di chiudere un modulo:
Public Sub CloseFormWithConfirmation(FormName As String) If MsgBox("Sei sicuro di voler chiudere questa finestra?", vbYesNo + vbQuestion, "Confirmation") = vbYes Then DoCmd.Close acForm, FormName End If End Sub
Puoi chiamarlo così:
Private Sub CloseFormWithConfirmation_Example() Chiama CloseFormWithConfirmation("AccessForm") End Sub
Stanco di cercare esempi di codice VBA? Prova AutoMacro!
Sintassi DoCmd.Close
La sintassi completa del metodo è:
DoCmd.Close (Tipo di oggetto, Nome oggetto, OggettoSalva) dove:
| Parametro | Descrizione |
|---|---|
| Tipo di oggetto | Facoltativo e questo è il tipo di oggetto che desideri chiudere. Questo può essere un modulo o un rapporto, ecc. |
| Nome oggetto | Facoltativo ed è il nome dell'oggetto che si desidera chiudere. |
| OggettoSalva | Facoltativo e viene utilizzato per specificare se si desidera salvare le modifiche apportate. |
