Nicole_Michelle01
Board Regular
- Joined
- Nov 9, 2005
- Messages
- 50
What would the macro look like to move the contents in every 7th row of Columns C & D down 7 rows and left into Columns A & B?
Thanks! ~ Nicole
Thanks! ~ Nicole
Sub MOVE_EVERY_7()
For MY_ROWS = 1 To Range("C65536").End(xlUp).Row Step 7
Range("C" & MY_ROWS & ":D" & MY_ROWS).Cut
Range("A" & MY_ROWS + 7).Select
ActiveSheet.Paste
Next MY_ROWS
End Sub