Enter Comment by Code

[mutrus]

When a comment is added to a cell it contains the users login by default.

I wish to add comments by using code. How can I assign the users login to a variable

 

[Juan Pablo González]

> I wish to add comments by using code.

Range("A1").AddComment "Juan Pablo"

> How can I assign the users login to a variable

MyVar = Application.UserName

 

[Ivan F Moala]

On 2002-09-11 20:54, mutrus wrote:
When a comment is added to a cell it contains the users login by default.

I wish to add comments by using code. How can I assign the users login to a variable

Actually it doesn't add the users login name.
It meely uses the User name from the Options droplist in Excel, which anyone can change.

If you want the login user name then thius may help;

<pre/>
Declare Function WNetGetUser Lib "mpr.dll" _
Alias "WNetGetUserA" ( _
ByVal lpName As String, _
ByVal lpUserName As String, _
lpnLength As Long) As Long

Function GetName() As String
Dim strUserName As String
strUserName = Space(255)
WNetGetUser "", strUserName, 255
GetName = Trim(strUserName)
End Function
</pre>

 

[mutrus]

Juan Pable G - thanks that works

Ivan F Foala - your reply does more than I asked but has now prompted me to think about that approach

Both replies thanks

 

[mutrus]

Ivan - I just realised what your logo was. No wonder I got a fast reply to my post.

Cheers from a fellow Kiwi

Go the Warriors

 

[Ivan F Moala]

On 2002-09-12 01:31, mutrus wrote:
Ivan - I just realised what your logo was. No wonder I got a fast reply to my post.

Cheers from a fellow Kiwi

Go the Warriors

Go the Warriors !
Your IP is the same as fellow Mrexcel MVP Paddy
Where are you ? Wellington ?

 

[mutrus]

West Harbour, Auckland

 

[Ivan F Moala]

On 2002-09-12 18:03, mutrus wrote:
West Harbour, Auckland

Kingsland, Auckland