U ovom ćemo vodiču naučiti kako otvoriti ili zatvoriti pristupne obrasce pomoću VBA.
Otvaranje pristupnog obrasca
Da biste otvorili obrazac u programu Access, upotrijebite metodu DoCmd.OpenForm:
DoCmd.OpenForm "Pristupni obrazac"
Otvorit će se obrazac pod nazivom „Pristupni obrazac“:
Pristupni obrazac prikazan u navigacijskom oknu
Otvoreni obrazac s kriterijima
Ovaj kôd će otvoriti obrazac u programu Access sa posebnim kriterijima:
DoCmd.OpenForm "Pristupni obrazac", acNormal,, "ID = 10"
DoCmd.OpenForm Sintaksa
Cijela sintaksa metode je:
DoCmd.OpenForm (NameOfForm, FormView, Naziv filtra, WhereCondition, DataMode, WindowMode, OpenArgs) gdje:
| Parametar | Opis |
|---|---|
| NameOform | Obavezno i naziv je obrasca koji želite otvoriti. |
| FormView | Izborno i omogućuje vam da navedete prikaz obrasca. To može biti: acDesign, acFormDS, acFormPivotChart, acFormPivotTable, acLayout, acNormal, acLayout ili acPreview. Zadana vrijednost je acNormal. |
| Naziv filtra | Izborno i omogućuje vam da navedete naziv upita ili SQL niza koji će se koristiti kao filter. |
| WhereCondition | Izborno i omogućuje vam provođenje upita tipa type bez upotrebe riječi where. |
| DataMode | Izborno i omogućuje vam da odredite način unosa podataka. To može biti: acFormAdd, acFormEdit, acFormPropertySettings ili acFormReadOnly. Zadana vrijednost je acFormPropertySettings. |
| WindowMode | Izborno i postavlja prikaz načina Window. To može biti: acDialog, acHidden, acIcon, acWindowNormal. Zadana vrijednost je acWindowNormal. |
| OpenArgs | Izborno se može pozivati u makroima i izrazima. |
VBA programiranje | Generator koda radi za vas!
Zatvorite obrazac u programu Access
Otvorite obrazac pomoću DoCmd.Close:
DoCmd.Close acForm, "AccessForm"
Zatvorite obrazac i spremite
Ovaj VBA kôd zatvorit će i spremiti pristupni obrazac:
DoCmd.Close acForm, "AccessForm", acSaveYes
Zatraži prije zatvaranja obrasca
Ovaj postupak će upitati korisnika prije zatvaranja obrasca:
Javna podzatvornica CloseFormWithConfirmation (FormName As String) Ako MsgBox ("Jeste li sigurni da želite zatvoriti ovaj prozor?", VbYesNo + vbQuestion, "Confirmation") = vbDa Zatim DoCmd.Close acForm, FormName End If End Sub
Možete ga nazvati ovako:
Privatni pod CloseFormWithConfirmation_Example () Pozovite CloseFormWithConfirmation ("AccessForm") End Sub
Umorni ste od traženja primjera VBA koda? Isprobajte AutoMacro!
DoCmd.Close Syntax
Cijela sintaksa metode je:
DoCmd.Close (ObjectType, ObjectName, ObjectSave) gdje:
| Parametar | Opis |
|---|---|
| ObjectType | Izborno, a to je vrsta objekta koju želite zatvoriti. To može biti obrazac ili izvješće itd. |
| ObjectName | Izborno i naziv je objekta koji želite zatvoriti. |
| ObjectSave | Izborno i koristi se za navođenje želite li spremiti izvršene promjene. |
