dragonmouse
Board Regular
- Joined
- May 14, 2008
- Messages
- 131
- Office Version
- 2016
- Platform
- Windows
Is there any way to see who may have accessed your spreadsheet? (Tracking not turned on). Someone may have messed with it.
Option Explicit
Private Sub Workbook_Open()
Dim LR As Long
With Sheets("Sheet1")
LR = .Range("A" & Rows.Count).End(xlUp).Row
.Range("A" & LR + 1).Value = Time
.Range("B" & LR + 1).Value = Environ("UserName")
ThisWorkbook.Save
End With
End Sub