Hi Everyone,
I have an excel workbook that I made as a tracker. I had a macro to insert the individual's user name and the date in the cell immediately to the right of the selected cell upon double click. It worked the last time I was using this sheet but have switched jobs and would like to modify the sheet to use for my current needs. I'm just not sure why this error is now popping up. Any help would be appreciated. Thanks in advance!
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("j3:ai350")) Is Nothing Then
Cancel = True
Target.Value = Environ("username")
Target.Offset(0, 1) = Date
End If
End Sub
I have an excel workbook that I made as a tracker. I had a macro to insert the individual's user name and the date in the cell immediately to the right of the selected cell upon double click. It worked the last time I was using this sheet but have switched jobs and would like to modify the sheet to use for my current needs. I'm just not sure why this error is now popping up. Any help would be appreciated. Thanks in advance!
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("j3:ai350")) Is Nothing Then
Cancel = True
Target.Value = Environ("username")
Target.Offset(0, 1) = Date
End If
End Sub