Мар 12 2012
Как через VBA отобразить диалог выключения компьютера?
Бывают ситуации, когда программным путем нужно отобразить окно перезагрузки через VBA.
Данный скрипт поможет Вам в этом(этот скрипт взят из открытых источников и является не задокументированной возможностью VBA )
Создаем VBA Модуль вставляем код:
Private Declare Sub ShutDownDialog Lib «shell32.dll» Alias «#60″ (ByVal hwndOwner As Long)
Private Sub cmdShowShutDown_Click()
ShutDownDialog Hwnd
End Sub
Запускаем нажатием F5 и вы увидите диалог для перезагрузки или выключения компьютера, работает на всех версиях Windows и Office