Comments in Excel Cells via VBA

[drkestrel]

I am trying to programmatically add some comments to Cells in Excel 97 worksheets usign VBA with codes similar to the following:

With xlsheet.Range("A11").AddComment
    .Text "The Text I wanted as comment"
    .Author "My Project name"
End With

I face the following problems:-
1) Compile error on .Author
a)Using

.Author = "My Project name"

doesn't work either
b)Nor does

Set .Author= "My Project name"

2) "The Text I wanted as comment" appears in BOLD in the comment box, which normally happens just for Author name non-programatically.

So How could I set comments such that the Author name appears properly and the text appears non-bold??
I want the comments to be
My Project name
The text I wanted as comments
[sig][/sig]

 

[dsi]

The Author is a ReadOnly string, therefore it can not be set. As far as the formatting, I am not sure. [sig][/sig]

 

[Karpov]

Ok,
.Author cannot be set, but as what is actually used is the value of Application.UserName. You can change the value of .UserName just before your comment adding code (read it into a variable before changing it so you can reset the UserName to its original value).
However, you should be able to get away with the following:

Range("I10&quot.AddComment
Range("I10&quot.Comment.Text Text:="My Project Name:" & Chr(10) & "The text I wanted as comment"

Excel should then be able to sort out the bold and normal text (bold appears for text on top line automatically). [sig][/sig]