Automatically Placing Text in a Comment

by Allen Wyatt
(last updated July 1, 2017)

1

Grant has a cell in a worksheet that when someone starts typing in the cell, he would like whatever they type to end up in a comment attached to the cell. The cell itself should remain blank, but the comment should contain whatever was typed.

The only way to accomplish this task is through the use of a macro. Using the event handler capabilities of Excel, you can create a macro that is triggered whenever a cell is changed. If the changed cell happens to be the cell that you want the comment associated with, then you can transfer the cell contents to the comment and remove them from the cell itself. The following short macro will do that:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim rCell As Range
    Dim sTemp As String

    Set rCell = Range("B4")
    If Not Intersect(Target, rCell) Is Nothing Then
        sTemp = rCell.Value
        rCell.ClearComments
        If Len(sTemp) > "" Then
            Application.EnableEvents = False
            On Error Resume Next
            rCell.AddComment
            rCell.Comment.Text Text:=sTemp
            On Error GoTo 0
            rCell.ClearContents
            Application.EnableEvents = True
        End If
    End If
End Sub

Note that since this is an event handler, it needs to be added to the code module for the worksheet you want affected. In this case, the move-to-comment code is triggered only when a change is made in cell B4; this address can be changed in the code, if desired.

It should also be noted that this macro is only triggered once the user finishes entering something into cell B4. It isn't triggered as the user starts to type. So, actual data entry still occurs in cell B4, not in the comment itself. Further, if someone types something into cell B4, then any existing comment is lost because the macro deletes it before moving the cell contents into the comment.

ExcelTips is your source for cost-effective Microsoft Excel training. This tip (13511) applies to Microsoft Excel 2007, 2010, 2013, and 2016.

Author Bio

Allen Wyatt

With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He  is president of Sharon Parq Associates, a computer and publishing services company. ...

MORE FROM ALLEN

Maintaining Text Formatting in a Lookup

Want to maintain the formatting used in one cell when you use formulas to reference that text in another cell? The answer is ...

Discover More

Sticking with the Dashes

By default, dashes don't "stick" to the text that follows them. Here's one way around this normal formatting convention.

Discover More

Controlling the Bold Text Attribute

When processing a document in a macro, you may need to make some of your text bold. It's easy to do using the Bold attribute, ...

Discover More

Program Successfully in Excel! John Walkenbach's name is synonymous with excellence in deciphering complex technical topics. With this comprehensive guide, "Mr. Spreadsheet" shows how to maximize your Excel experience using professional spreadsheet application development tips from his own personal bookshelf. Check out Excel 2013 Power Programming with VBA today!

More ExcelTips (ribbon)

Locking the Size of Pictures in Comments

Excel allows you to place pictures inside of comments. If you do this, you may have experienced a situation where the size of ...

Discover More

Changing Comment Color for a Single User

The default color used to format comments is determined by Windows, not Excel. You can adjust the formatting of individual ...

Discover More

Pasting a Comment into Your Worksheet

Excel allows you to not only put information into cells, but into comments attached to those cells. Here's how to copy the ...

Discover More
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

View most recent newsletter.

Comments

If you would like to add an image to your comment (not an avatar, but an image to help in making the point of your comment), include the characters [{fig}] in your comment text. You’ll be prompted to upload your image when you submit the comment. Maximum image size is 8Mpixels. Images larger than 600px wide or 1000px tall will be reduced. Up to three images may be included in a comment. All images are subject to review. Commenting privileges may be curtailed if inappropriate images are posted.

What is 7 - 0?

2017-07-02 05:25:40

Harold Druss

The following line caused a "Type mismatch" error for me.
If Len(sTemp) > "" Then
I changed to:
If Len(sTemp) > 0 Then


This Site

Got a version of Excel that uses the ribbon interface (Excel 2007 or later)? This site is for you! If you use an earlier version of Excel, visit our ExcelTips site focusing on the menu interface.

Newest Tips
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

(Your e-mail address is not shared with anyone, ever.)

View the most recent newsletter.