Create a macro to move address line from 3 rows to 1 single row

Closed
ESChomesecurity Posts 1 Registration date Friday May 16, 2014 Status Member Last seen May 16, 2014 - May 16, 2014 at 12:44 PM
 ESChomesecurity - May 19, 2014 at 09:25 AM
I created a macro moving address data as follows to a single row:
Select C1 move to B1
Select C2 move to C1
Select C3 move to D1
Select I3 move to F1
Select I4 move to G1
Select I1 and Delete

How can I use this macro to accomplish the same outcome for the next row that I want to initiate the macro?

Thanks.
Related:

1 response

Can you show what you have done so far so that it can be adapted for your needs?
0
ESChomesecurity
May 19, 2014 at 09:25 AM
Sub New_Move()
'
' New_Move Macro
' moves name address dsc permit and deletes passcode
'
' Keyboard Shortcut: Ctrl+n
'
ActiveWindow.SmallScroll Down:=33
Range("C966").Select
Selection.Cut Destination:=Range("A969")
Range("C969").Select
Selection.Cut Destination:=Range("B969")
Range("C970").Select
Selection.Cut Destination:=Range("C969")
Range("C971").Select
Selection.Cut Destination:=Range("D969")
Range("I971").Select
Selection.Cut Destination:=Range("F969")
Range("I972").Select
Selection.Cut Destination:=Range("G969")
Range("I969").Select
Selection.ClearContents
End Sub
0