Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Dim aCell as Range
- For Each aCell In Range("A1:A9999").Cells
- 'appends prefix to value of each cell
- aCell.Value = "CC_" & aCell.Value
- Next aCell
- Range("A1:A9999").Value = "CC_" & Range("A1:A9999").Value
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement