[算表] 檔案儲存後，有一個資料表會記錄儲存時間
軟體: excel 2013
版本:
我想寫一個事件驅動程式，達到當我儲存檔案的時候，
裡面某個資料表會記錄儲存修改的時間與使用者
我將程式碼放在excel物件裡的thiswookbook，卻沒有反應
Option Explicit
Private Sub appevent_WorkbookBeforeSave(ByVal Wb As Workbook, ByVal Success
As Boolean)
Dim lastrow As Long
Dim Savelog As Worksheet
Set Savelog = Worksheets("savelog")
lastrow = Savelog.Cells(Savelog.Rows.Count, 1).End(xlUp).Row + 1
With Savelog
.Cells(lastrow, 1) = Now()
.Cells(lastrow, 2) = Application.UserName
.Cells(lastrow, 3) = ActiveSheet.Name
End With
End Sub
可以告訴我 到底是出了什麼問題嗎？
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 114.25.166.6
→
01/26 02:09, , 1F
01/26 02:09, 1F
→
01/26 02:10, , 2F
01/26 02:10, 2F
→
01/26 21:25, , 3F
01/26 21:25, 3F
Office 近期熱門文章
PTT數位生活區 即時熱門文章
