Morning all,
I currently have some vba code running which when a staff member double clicks in a specific range of cells it enters the current time - 1 hour due to the UK currently being in Zulu time. This is the code.....
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Date stamp with zulu
If Not Intersect(Target, Range("B4:B249")) Is Nothing Then
Cancel = True
Target.Value = Now() - (1 / 24)
End If
End Sub
Is there anything I can add to this code that will revert the double click back to "normal time" (not -1 hour) when the clocks hit 02:00am on the 31/10 ? We work 24 hours and I'm not there to delete the -(1 / 24) part of the command.
Thanks all
T
I currently have some vba code running which when a staff member double clicks in a specific range of cells it enters the current time - 1 hour due to the UK currently being in Zulu time. This is the code.....
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Date stamp with zulu
If Not Intersect(Target, Range("B4:B249")) Is Nothing Then
Cancel = True
Target.Value = Now() - (1 / 24)
End If
End Sub
Is there anything I can add to this code that will revert the double click back to "normal time" (not -1 hour) when the clocks hit 02:00am on the 31/10 ? We work 24 hours and I'm not there to delete the -(1 / 24) part of the command.
Thanks all
T