I would like to copy a part of every second row and paste it beside previous one. What is wrong with this little macro?
Sub LittleMacro()
Dim i, j As Integer
For i = 2 To 1000 Step 2
For j = 1 To 1000 Step 2
Range("A" & i & ":K " & i).Select
Selection.Cut
Range("L" & j).Select
ActiveSheet.Paste
Next j
Next i
End Sub
Sub LittleMacro()
Dim i, j As Integer
For i = 2 To 1000 Step 2
For j = 1 To 1000 Step 2
Range("A" & i & ":K " & i).Select
Selection.Cut
Range("L" & j).Select
ActiveSheet.Paste
Next j
Next i
End Sub