• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Windows afsluiten

Status
Niet open voor verdere reacties.
robdgr

robdgr

Verenigingslid
Lid geworden
8 sep 2001
Berichten
4.420
Office versie
Microsoft 365
Code: 
Sub Sluit_excel()
    [L1].Select
    ActiveWorkbook.Save
    Application.Quit
End Sub
Met deze code sluit ik een bestand af. Nu zocht ik naar een mogelijkheid om ook Windows af te sluiten en vond
Code: 
Shell "shutdown -s -t", vbHide
die dat zou doen. Maar helaas.

Heeft iemand daar ervaring mee. Het kan zijn dat deze regel wel werkt in oudere Windows-versies, maar ik gebruik 10 en ga om deze reden niet meer terug.
 
Maak van die - tekens eens een /

Kijk ook eens in een command prompt naar shutdown /?
 
edmoor zei:
Kijk ook eens in een command prompt naar shutdown /?
Klik om te vergroten...
Dit heb ik even gedaan en daar wil ik later meer aandacht aan besteden. Alleen de omzetting van - naar / gaf nog geen resultaat, maar je hebt me wel op een spoor gezet. Thnx tot zover.
 
Deze?

Ik gebruik deze altijd..

Shutdown -s -f -t 10

Ff van bijlage extensie wijzigen van .txt naar .bat
 

Bijlagen

  • Sluitwindows.txt
    20 bytes · Weergaven: 32
DaanM zei:
Ik gebruik deze altijd..

Shutdown -s -f -t 10

Ff van bijlage extensie wijzigen van .txt naar .bat
Klik om te vergroten...

Ik ook, werkt prima, alleen gebruik ik 0 in plaats van 10, maar dat hangt af van je persoonlijke wens.
 
Dank allen. De code is nu geworden:
Code: 
Sub Sluit_windows()
    [L1].Select
    ActiveWorkbook.Save
    Application.Quit
    Shell "Shutdown -s -f -t 0", vbHide
End Sub
De 10 zorgt voor een schermpje, dat je moet sluiten, met de 0 heb je dat niet
 
Laatst bewerkt:
Of:

Code: 
Sub M_snb()
   CreateObject("shell.application").ShutdownWindows
End Sub
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan