J. Stephen
New member
- Joined
- Mar 31, 2012
- Messages
- 6
- Reaction score
- 0
- Points
- 0
I came across this code ( which I've customized) that searches and offsets a specified name.
How can this be changed to Copy/Paste the value instead of Cut?
I'd like to keep this name in both columns,
Thanks
How can this be changed to Copy/Paste the value instead of Cut?
I'd like to keep this name in both columns,
Code:
Sub Offset_Name()
Dim r As Range
Do
Set r = Columns(4).Find("*-")
If r Is Nothing Then Exit Do
r.Cut Destination:=r.Offset(0, 1)
Loop
End Sub
Thanks