Workbook access counter in excel?

B

basher57

Is it possible to add a counter to an Excel sheet that adds one every time
the file is accessed? Similar to a webpage counter I suppose is what I am
after.
 
K

Knut

Place this in ThisWorkbook-module:

Private Sub Workbook_Open()
Worksheets("Sheet1").Range("A1") = Worksheets("Sheet1").Range("A1") + 1
ThisWorkbook.Save
End Sub
 
Top