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.
Access_aktuell
Brandneue Tipps für Ihre Arbeit mit Access – Zeit sparend, effizient und professionell!
Verbringen auch Sie viel zu viel Zeit mit der Suche nach der optimalen Lösung für ein Access-Problem? Wünschen Sie sich praxisnahe und direkt umsetzbare Access-Tipps, die ohne langes Gerede auf den Punkt kommen?
In
Access_aktuell müssen Sie sich in kein Thema umständlich einlesen, denn Sie suchen ja eine schnelle Lösung für Ihr Problem. Wenn Sie einen unserer Tipps umsetzen möchten, brauchen Sie dafür maximal 10 Minuten. Sie erhalten alle Erläuterungen und notwendigen Prozeduren leicht verständlich für den Praxiseinsatz aufbereitet.
Mit diesem nützlichen Profi-Know-how werden Sie zukünftig noch schneller und effizienter neue Datenbanken entwickeln und laufende Projekte optimieren.
Machen Sie
Access_aktuell zu Ihrem stärksten Verbündeten bei Ihrer täglichen Datenbank-Arbeit!
Lesen Sie hier mehr über „Access_aktuell“
Klicken Sie hier für Ihren kostenlosen „30-Tage-Gratis-Test“
|