Gruppen

Top Gruppen: Windows 7; Windows Vista; Windows XP; Textverarbeitung; Excel; DSL; Internet Browser; E-Mail/Outlook
Betriebsysteme: Windows classik; Linux; BS-Sonstige
Software: Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; SW-Sonstige
Hardware: Mainboard/CPU; Grafikkarten; Peripherie; Laptop/Notebook; HW-Sonstiges
Netzwerk: Telefon,ISDN,Modem; W-Lan; NW-Sonstiges
Programmierung: PHP,ASP,Perl...; Java,C++...; Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke; SN Intern; Test

/ Forum / Datenbanken

Datenbanken

Fragevon holger771 vom 08.03.2020, 13:14 Options

SQL-Abfrage per Button in Access

Hallo!
Ich habe eine relationale Datenbank komplett fertig organisiert und in Access umgesetzt. Jetzt habe ich für verschiedene Aufgaben Module erstellt die den entsprechenden VBA Code enthalten. Jedes Modul enthält nur eine Methode. Außerdem habe ich ein paar Abfragen erstellt die bestimmte SELECT auflistungen auswerfen, das möchte ich (möglichst ohne irgendwelche assistenten) irgendwie in eine Form einbauen, und zwar über buttons. also meine erste frage: wie starte ich ein Modul (bzw die enthaltene methode) per Button-Klick, und 2. wie starte ich eine beliebige SQL-Query per Button-klick?
dürfte nicht all zu schwer sein, oder?
danke und gruß
Holger

Antwort schreiben

Antwort 1 von Marie vom 09.03.2020, 03:18 Options

Zitat:
wie starte ich ein Modul (bzw die enthaltene methode) per Button-Klick

Ein Modul kann man nicht starten, in ein Modul schreibst Du eine Function, und die startest Du ganz einfach indem Du sie aufrufst, also zum Beipiel

Public Function fktDeineFunction()
    MsgBox "Hurra, hat geklappt", vbInformation, "Hier in fktDeineFunction"
End Function

Der Button heisst "DeinButton", dort schreibst Du als Ereignis beim Klicken:

Private Sub DeinButton_Click()
    Call fktDeineFunction
End Sub

Das call kannst Du auch weglassen, ich schreibe es immer dazu, damit ich unterscheiden kann, wann eine Funktion aufgerufen wird.

Zitat:
2. wie starte ich eine beliebige SQL-Query per Button-klick?

Wenn die Abfrage abgespeichert ist, dann einfach:

Private Sub DeinButton_Click()
    DoCmd.OpenQuery "DeineAbfrage", acNormal, acEdit
End Sub

Gruß Marie

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Tipp einschicken

News einschicken