Macro to copy/paste specific range every 3 rows
Solved/Closed
Related:
- Macro to copy/paste specific range every 3 rows
- Excel macro for copy & paste selected range ✓ - Forum - Programming
- MACRO to copy / paste cell text down various rows ✓ - Forum - Excel
- Excel - A macro to copy/paste a selected range - How-To - Excel
- Macro copy and paste in next blank cell - Guide
- Macro copy and paste in next blank cell ✓ - Forum - Excel
1 reply
TrowaD
Jul 7, 2015 at 11:56 AM
- Posts
- 2886
- Registration date
- Sunday September 12, 2010
- Status
- Moderator
- Last seen
- June 27, 2022
Jul 7, 2015 at 11:56 AM
Hi Isa,
See if the following code works for you:
Best regards,
Trowa
See if the following code works for you:
Sub RunMe() Dim x As Integer x = 2 Do Range(Cells(x, "BG"), Cells(x, "FJ")).Cut Sheets("Worksheet1").Cells(x + 1, "E") Range(Cells(x + 1, "BG"), Cells(x + 1, "DH")).Cut Sheets("Worksheet1").Cells(x + 2, "E") x = x + 3 Loop Until x > 4000 End Sub
Best regards,
Trowa
Jul 7, 2015 at 12:51 PM
You just saved my day! :))
Best regards,
Isa