Hallo zusammen,

ich habe ein Makro das über mehrere Stunden läuft, daher würde ich das gerne jeden Tag starten bevor ich nach Hause gehe und den PC dann nach Beendigung automatisch herunterfahren lassen.

Ich habe einige Erwähnungen gefunden, dass das wohl mit VBA in Excel auch möglich ist, dass ich das einfach an das Ende meines Makros packen würde.

Allerdings waren das entweder Vorschläge für ältere Systeme, 32-Bit Systeme oder einen Neustart und es war mir nicht möglich das entsprechend anzupassen.

Vielleicht kann mir dabei ja jemand helfen?

Dim objWMI As Object, objItem As Object
    Set objWMI = GetObject("winmgmts:{(Shutdown)}//./root/cimv2").ExecQuery( _
        "SELECT * FROM Win32_OperatingSystem WHERE Primary=true")
    For Each objItem In objWMI
        Call objItem.Reboot
    Next

Das ist eins der Beispiele, die ich gefunden habe, vielleicht kann man das ja entsprechend anpassen?

Ich nutze Windows 10 und Excel 2016