| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Add a comment when cells are changed
Hello
I have the range "D2:Q50" in the active sheet. I am looking for a macro that will automatically insert a comment ("changed by username on now") into the cell changed. I suspect that Private Sub Workbook_SheetChange plays a role here. If you could help, please. Regards |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Add a comment when cells are changed
How about something like this...
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Not Intersect(Target, Range("D2:Q50")) Is Nothing Then On Error Resume Next Target.Comment.Delete Target.AddComment "Changed by " & Application.UserName & " on " & Now End If End Sub -- Rick (MVP - Excel) "dimbroane" wrote in message ... Hello I have the range "D2:Q50" in the active sheet. I am looking for a macro that will automatically insert a comment ("changed by username on now") into the cell changed. I suspect that Private Sub Workbook_SheetChange plays a role here. If you could help, please. Regards |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Add a comment when cells are changed
Excellent, it's quite perfect. Thank you.
On Dec 1, 7:45*pm, "Rick Rothstein" wrote: How about something like this... Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) * If Not Intersect(Target, Range("D2:Q50")) Is Nothing Then * * On Error Resume Next * * Target.Comment.Delete * * Target.AddComment "Changed by " & Application.UserName & " on " & Now * End If End Sub -- Rick (MVP - Excel) "dimbroane" wrote in message ... Hello I have the range "D2:Q50" in the active sheet. I am looking for a macro that will automatically insert a comment ("changed by username on now") *into the cell changed. I suspect that Private Sub Workbook_SheetChange plays a role here. If you could help, please. Regards |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Adding comment to cells not working with merged cells | Excel Programming | |||
| Can Comment in a cell be changed as the content in another cell ?? | Excel Discussion (Misc queries) | |||
| Horizontal Cells changed to Vertical cells | Excel Programming | |||
| Cell comment boxes shouldn't change size/shape unless changed by u | Excel Discussion (Misc queries) | |||
Hybrid Mode
