Přístup k VBA - formulář pro otevření / zavření

V tomto kurzu se naučíme, jak otevírat nebo zavírat formuláře aplikace Access pomocí jazyka VBA.

Otevření přístupového formuláře

K otevření formuláře v Accessu použijte metodu DoCmd.OpenForm:

DoCmd.OpenForm "AccessForm"

Otevře se formulář s názvem „AccessForm“:

AccessForm je zobrazen v navigačním podokně

Otevřený formulář s kritérii

Tento kód otevře v Accessu formulář se specifickými kritérii:

DoCmd.OpenForm "AccessForm", acNormal,, "ID = 10"

Syntaxe DoCmd.OpenForm

Úplná syntaxe metody je:

DoCmd.OpenForm (NameOfForm, FormView, Název filtru, WhereCondition, Režim dat, Režim okna, OpenArgs) kde:

Parametr	Popis
NameOfForm	Povinný údaj a název formuláře, který chcete otevřít.
FormView	Volitelné a umožňuje zadat pohled na formulář. Může to být buď: acDesign, acFormDS, acFormPivotChart, acFormPivotTable, acLayout, acNormal, acLayout nebo acPreview. Výchozí hodnota je acNormal.
Název filtru	Volitelné a umožňuje zadat název dotazu nebo řetězce SQL, který se má použít jako filtr.
WhereCondition	Volitelné a umožňuje provádět dotaz typu kde bez použití slova kde.
Režim dat	Volitelné a umožňuje zadat režim zadávání dat. Může to být buď: acFormAdd, acFormEdit, acFormPropertySettings, nebo acFormReadOnly. Výchozí hodnota je acFormPropertySettings.
Režim okna	Volitelné a nastavuje zobrazení režimu Okno. Může to být buď: acDialog, acHidden, acIcon, acWindowNormal. Výchozí hodnota je acWindowNormal.
OpenArgs	Volitelně lze odkazovat na makra a výrazy.

Programování VBA | Generátor kódu pracuje pro vás!

Zavřete formulář v aplikaci Access

Pomocí DoCmd.Close zavřete otevřený formulář:

DoCmd.Close acForm, "AccessForm"

Zavřít formulář a uložit

Tento kód VBA se zavře a uloží přístupový formulář:

DoCmd.Close acForm, "AccessForm", acSaveYes

Výzva před uzavřením formuláře

Tento postup vyzve uživatele před zavřením formuláře:

Public Sub CloseFormWithConfirmation (FormName As String) If MsgBox („Opravdu chcete toto okno zavřít?“, VbYesNo + vbQuestion, „Potvrzení“) = vbYes Then DoCmd.Close acForm, FormName End If End Sub

Můžete to nazvat takto:

Soukromý podřízený CloseFormWithConfirmation_Example () Volání CloseFormWithConfirmation ("AccessForm") End Sub

Už vás nebaví hledat příklady kódu VBA? Zkuste AutoMacro!

Syntaxe DoCmd.Close

Úplná syntaxe metody je:

DoCmd.Close (ObjectType, ObjectName, ObjectSave) kde:

Parametr	Popis
ObjectType	Volitelné a toto je typ objektu, který chcete zavřít. Může to být formulář nebo zpráva atd.
ObjectName	Volitelné a je název objektu, který chcete zavřít.
ObjectSave	Volitelné a slouží k určení, zda chcete provedené změny uložit.