How would you optimize the following code :
Sheet.Activate
Sheet.Cells(i,j).EntireRow.Select
selection.Copy
selection.Offset(1).Insert
I am particularly bogged with the last line Thanks
Asked
Active
Viewed 18 times
0
RetiredGeek
- 2,300
- 1
- 4
- 16
-
`Worksheets("Sheet1").Rows(i).Copy Destination:=Worksheets("Sheet1").Rows(i + 1)` Obligatory link: [How to avoid using Select in Excel VBA](https://stackoverflow.com/questions/10714251/how-to-avoid-using-select-in-excel-vba) – Darren Bartrup-Cook Mar 02 '21 at 11:15
-
Bravo and Merci ! – Jean Robitaille Mar 02 '21 at 21:16