robcunliffe
Technical User
I have a column called notes, i would like to move the data from each cell in this colunm in to a 'note' in the adjacent cell for the same row.
Any ideas?
office xp
win xp
Any ideas?
office xp
win xp
Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Excel - text in field - move to note
- Thread starter robcunliffe
- Start date
- Status
To speed-up all, use custom function. Go to VBE (Tools>Macro>Visual Basic Editor), add module to your VBProject and paste here:
Function ChangeComment(rng1 As Range, sTxt As String)
Application.Volatile
rng1.Comment.Text sTxt
End Function
Suppose you have text in A1 and need a comment in B1. Add comment to B1 and format it. In C1 add formula: =ChangeComment(B1,A1)
For texts in column A, copy down cells B1:C1, to get comments in column B1. The comments should contain text from cells from column A. Now you can delete formulas in column C, text in comments will remain.
combo
Function ChangeComment(rng1 As Range, sTxt As String)
Application.Volatile
rng1.Comment.Text sTxt
End Function
Suppose you have text in A1 and need a comment in B1. Add comment to B1 and format it. In C1 add formula: =ChangeComment(B1,A1)
For texts in column A, copy down cells B1:C1, to get comments in column B1. The comments should contain text from cells from column A. Now you can delete formulas in column C, text in comments will remain.
combo
- Status
Similar threads
- Locked
- Question
- Question