Add User Name to Comment

[Angeles]

Hi , how can I add the current User Name to comment ? I am using the line :

ActiveCell.AddComment ("Item was added on " & Str(Now))

I want to set :

ActiveCell.AddComment ("Attribute was added on " & Str(Now) " , it was added
by " )

Thank you

 

[Jim Thomlinson]

You can use Environ("username") something like this...

ActiveCell.AddComment ("Attribute was added on " & Str(Now) & _
" , it was added by " environ("username"))

 

[john]

ActiveCell.AddComment "Attribute was added on " & Str(Now) & _
Chr(10) & " it was added by " & Application.UserName

should work

 

[Rick Rothstein \(MVP - VB\)]

This function call...

Environ("UserName")

will return the user name... just concatenate it where you want it to go.

Rick

 

[Angeles]

It worked !

Thank you very much

ActiveCell.AddComment "Attribute was added on " & Str(Now) & _
Chr(10) & " it was added by " & Application.UserName

should work