如何在Windows关闭之前运行宏

时间:2013-07-09 15:27:41

标签: windows vba excel-vba scripting excel

我想在Windows shutsdown之前运行一个宏来记录时间。 我写了下面的程序,在windows启动后立即运行宏。我会将shortcut放在Windows startup文件夹中,这样当Windows启动时,它将log当前时间和日期。

但是如何在关闭PC之前运行宏。 以下相同代码适用于Start upshut down little change。 但是如何在macro or code

之前运行windows turns off
Private Sub Workbook_Open()
'
' Macro1 Macro
'
Dim Day As Date
Dim Tim As Date
Dim Row As Integer
Dim Col As Integer
Row = 1
Col = 1

Day = DateValue(Now)
Tim = TimeValue(Now)
While (Cells(Row, Col) <> "")
Row = Row + 1
Wend
Cells(Row, Col) = Day
Cells(Row, Col + 1) = Tim

ThisWorkbook.Save

'
End Sub

1 个答案:

答案 0 :(得分:3)

如果你在启动文件夹中放了一些东西,它就不会真正在启动时运行,而是在用户登录时运行。

要在启动或关闭时运行某些内容,您需要通过组策略实现启动或关闭脚本。在运行框中键入“gpedit.msc”以探索组策略。

另一个解决方案是系统事件日志,来自源“eventlog”的事件正在记录所有启动和关闭活动。