In der Systembibliothek „Shell Controls And Automation“ finden sich einige sehr nützliche Funktionen: Mit der Methode „ShutdownWindows“ können Sie den normalerweise per Menü START > HERUNTERFAHREN aufgerufenen Dialog anzeigen lassen.
Ein Klick auf ABMELDEN erlaubt einen schnellen Anwenderwechsel, AUSSCHALTEN fährt den Rechner sofort herunter, ein Klick auf STANDBY aktiviert den Ruhemodus.
Ein explizites Beenden von Access und anderen Anwendungen ist nicht notwendig, da Windows das beim Herunterfahren automatisch erledigt.
Access-Berater-Tipp: So nehmen Sie den Einbau einer Schaltfläche für den Aufruf des Dialogs vor:- Wechseln Sie mit Alt + F11 in die VBA-Entwicklungsumgebung oder öffnen Sie ein Modul im Entwurfsmodus.
- Wählen Sie das Menü EXTRAS > VERWEISE aus.
- Lokalisieren Sie den Eintrag „Microsoft Shell Controls And Automation“ und aktivieren Sie das Kontrollkästchen vor dem Eintrag.
- Übernehmen Sie die Änderungen mit einem Klick auf OK.
- Öffnen Sie das betreffende Formular, z. B. ein Hauptmenü, im Entwurfsmodus.
- Legen Sie im Formular eine Schaltfläche ACCESS BEENDEN, RECHNER HERUNTERFAHREN (Name = „btnShutdown“) an.
- Stellen Sie die Eigenschaft „Beim Klicken“ auf den Eintrag „[Ereignisprozedur]“ ein und klicken Sie auf die Schaltfläche mit den 3 Punkten, um den VBA-Editor zu öffnen.
- Geben Sie die folgenden Anweisungen ein:
Private Sub btnShutDown_Click()
Dim s As New Shell
s.ShutdownWindows
End Sub
- Speichern Sie die Änderungen und lassen Sie das Formular einmal testweise anzeigen.
Nach einem Klick auf die Schaltfläche ACCESS BEENDEN, RECHNER HERUNTERFAHREN wird nun der bekannte Dialog „Computer ausschalten“ angezeigt.