cell content into a note

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Chuck - 02 Nov 2007 00:03 GMT

hey guys,

just curious if this can be achieved or how it can be achieved

say i have this

Column A Row 1 = Short Description
Column B Row 1 = Long descriptoin

B2:B10 = are all the short descriptions
B2:B10 = are all the long descriptions

is there a way to just put the comment into the short description
cells from the long description cells via a note and then hide the
long description column?

can anyone advise as to how this can be achieved?
cheers

Reply to this Message

Harlan Grove - 02 Nov 2007 00:43 GMT

Don't multipost.

Reply to this Message

Gord Dibben - 02 Nov 2007 01:50 GMT

You could add Comments to the column A cells with the text from Column B cells
and have Column B hidden.

Sub Comment_Text_Add()

Dim addtext As String
Dim cmt As Comment

For Each Cell In Range("A1:A10") 'or Selection
Set cmt = Cell.Comment
addtext = Cell.Offset(0, 1).Value
If cmt Is Nothing Then
Set cmt = Cell.AddComment
cmt.Text Text:=addtext
Else
cmt.Text Text:=addtext
End If
With cmt.Shape.TextFrame
.Characters.Font.Bold = False
End With

Next Cell
End Sub

Gord Dibben MS Excel MVP

>hey guys,
>
[quoted text clipped - 14 lines]
>can anyone advise as to how this can be achieved?
>cheers

Reply to this Message

Rate this thread: