Shut Down the Computer

[hmk]

Hi there

Is there a VBA code to shut down the computer ?

 

[Legacy 98055]

A one liner:

CreateObject("Shell.Application").ShutdownWindows

 

[Emily]

A one liner:

CreateObject("Shell.Application").ShutdownWindows

Hi,

It's only pop up the shutdown window

Can it shutdown automatically?

 

[Legacy 98055]

If you really want to use a brute force method, see:

http://webtools.live2support.com/windows/shutdown.php

 

[hmk]

Thank u 4 reply

i tried this

Sub Test2()

'SHUTDOWN [logoff_option]  [/m \\Computer] [options]
'/s         Shutdown    
'/r         Shutdown and Restart

SHUTDOWN /s 

End Sub

but it tells me Expected : Expression and highlight this sign /

could you please show me how to make it work ??

 

[xapie128]

Try -s instead of /s

 

[Scott Huish]

Perhaps:

Sub test()
Shell (Environ("SystemRoot") & "\System32\shutdown.exe -s")
End Sub

 

[hmk]

Thank u v much

it worked, but how about using r, it did not work, it only shuts the pc down, any idea why ?

and how about controlling the defult time of shuting down ?


r is to shutdown and restart the PC

Thank u v much