cell content into a note
Hi Chuck
This small macro should do the trick
Sub CopyDescToComment()
Dim lr As Long, i As Long
lr = Cells(Rows.Count, "A").End(xlUp).Row
For i = 1 To lr
Cells(i, 1).AddComment
Cells(i, 1).Comment.Text Text:="" & Cells(i, 2).Value
Next
Columns("B:B").EntireColumn.Hidden = True
End Sub
Copy the macroAlt+F11Insert ModulePaste code into white paneAlt+F11 to
return to Excel sheet.
ToolsMacroRunhighlight macro nameRun
--
Regards
Roger Govier
"Chuck" wrote in message
oups.com...
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
|