Excel 2013.
I want to add to quick launch a button to open a blank comment in a cell, with the cursor in there set to edit it.
I can use the 'add a comment' function which almost works, but the comment box opens with " :" and the cursor is on the second line. If I backspace twice it deletes the " :", and then the text is annoyingly in bold. I just want a blank comment box with no bold (or any other) formatting.
Is there a way of doing this with a macro?
try this
Commandbutton1_Click() Range("A1").AddComment Range("A1").Comment.Visible = False Range("A1").Comment.Text Text:="" With Selection.Font .Name = "Tahoma" .FontStyle = "Regular" .Size = 9 .Strikethrough = False .Superscript = False .Subscript = False .OutlineFont = False .Shadow = False .Underline = xlUnderlineStyleNone .ColorIndex = xlAutomatic .TintAndShade = 0 .ThemeFont = xlThemeFontNone End With Range("A1").Select End Sub
Teach me Excel VBA
if you want to open the comment box in edit mode ,just change this line
to trueRange("A1").Comment.Visible = False
NM.
Thanks for the link it does exactly what I want!
Last edited by Dave42; 01-13-2017 at 07:23 AM.
Re: Macro to open up a new blank comment for editing
Good morning Dave42
How about :
HTHSendKeys "+{F2}"
DominicB
http://www.contextures.com/xlcomments03.html
This is a usefull link and I think DONE!
You are welcome!
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks