Macro to copy/paste specific range every 3 rows
Solved/Closed
Related:
- Macro to copy/paste specific range every 3 rows
- Psiphon 3 download - Download - VPN
- Hitman 3 cheats - Guide
- Excel if range of cells contains specific text ✓ - Excel Forum
- Compare two worksheets and paste differences to another sheet - excel vba free download ✓ - Excel Forum
- 3 beeps on startup no display ✓ - CPU & Desktop Forum
1 reply
TrowaD
Posts
2921
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
January 16, 2023
545
Jul 7, 2015 at 11:56 AM
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