Hollywood22
New Member
- Joined
- May 27, 2014
- Messages
- 9
Hi all,
VBA newbie, hoping this is a quick edit. I found the following function online to create a timestamp function, and it works great for a single target cell. Until my corp allows the use of the most recent build with a built in changelog which could be a year or more, I am hoping someone can help modify the simple code below to:
1 - Act on a range of cells, i.e a1:z1
2 - If not too difficult add the user initials who did the change.
----------------------------------------------------------------------------------
Function MyTimestamp(Reference As Range)
If Reference.Value <> "" Then
MyTimestamp = Format(Now, "dd-mm-yyyy hh:mm:ss")
Else
MyTimestamp = ""
End If
End Function
-----------------------------------------------------------------------------------
Thanks in advance
VBA newbie, hoping this is a quick edit. I found the following function online to create a timestamp function, and it works great for a single target cell. Until my corp allows the use of the most recent build with a built in changelog which could be a year or more, I am hoping someone can help modify the simple code below to:
1 - Act on a range of cells, i.e a1:z1
2 - If not too difficult add the user initials who did the change.
----------------------------------------------------------------------------------
Function MyTimestamp(Reference As Range)
If Reference.Value <> "" Then
MyTimestamp = Format(Now, "dd-mm-yyyy hh:mm:ss")
Else
MyTimestamp = ""
End If
End Function
-----------------------------------------------------------------------------------
Thanks in advance