Count of how many times a macro is ran Today

[SeliM]

Good morning,
Could you advise if it possible to create a macro counter that records how many times a macro is ran on a given day pls.

I have tried to adjust the following to no avail:
"Range("A1").Value = Range("A1").Value + 1" which i found on the web.

Your advice would be much appreciated.

geoff

 

[Akuini]

Glad you figured it out.
It is not necessary to utilize Select in order to interact with a cell, as it is inefficient. Instead, consider using With...End With, like this:

Sub count()
'To count how many times the Data entry is ran
With Sheets("Sheet2")
    If .Range("B1") <> Date Then
    .Range("B1") = Date
    .Range("A1") = 0
    End If
    .Range("A1") = .Range("A1") + 1
End With

'data sheet (sheet1) selected
With Sheets("Sheet1")
    .Range("B2") = "1"
    .Range("B3") = "2"
    .Range("B4") = "3"
    .Range("B5") = "4"
End With

End Sub