Count Number of Times worksheet has been Open

[Peterleee]

is there any way to programatically add 1 to a counter whenever a worksheet/ workbook is open? and explain the process

thanks

 

[TryingToLearn]

For workbook OPENS:


Code placed in ThisWorkbook module

Private Sub Workbook_Open()
 Sheets("sheet1").Range("a1") = Sheets("sheet1").Range("a1") + 1
End Sub

For worksheet ACTIVATES:

code placed in the Sheet module

Private Sub Worksheet_Activate()
 me.Range("a1") = me.Range("a1") + 1
End Sub

HTH

 

[Colo]

Hello Peterleee,

Plase the number into the specific cell, and add number when workbook is opened with useing Workbook_Open Event.

'Place this in the ThisWorkbook module
Private Sub Workbook_Open()
	Sheets("Sheet1").Range("A1").Value = Sheets("Sheet1").Range("A1").Value + 1
End Sub