Copy a range using macro
hi, i am a new learner in microsoft excel macro.
Row Dept Module Headcount access number 1 AT 5 23 5 2 3 BA 2 10 5 4 5 FG 7 12 5 Based on the example above, I need help on how to copy row 1 to 2, row 3 to 4 and row 5 to 6 using "range" command? Thank you. |
Copy a range using macro
Sub gsnu()
Set r = ActiveSheet.UsedRange nlastrow = r.Rows.Count + r.Row - 1 For i = 1 To nlastrow Step 2 Cells(i, 1).EntireRow.Copy Cells(i + 1, 1) Next End Sub -- Gary''s Student "Jen" wrote: hi, i am a new learner in microsoft excel macro. Row Dept Module Headcount access number 1 AT 5 23 5 2 3 BA 2 10 5 4 5 FG 7 12 5 Based on the example above, I need help on how to copy row 1 to 2, row 3 to 4 and row 5 to 6 using "range" command? Thank you. |
Copy a range using macro
Hi Jen,
the following command will copy the entire row 1 to row 2: Range("1:1").Copy Destination:=Range("2:2") Regards, Ingolf Jen schrieb: hi, i am a new learner in microsoft excel macro. Row Dept Module Headcount access number 1 AT 5 23 5 2 3 BA 2 10 5 4 5 FG 7 12 5 Based on the example above, I need help on how to copy row 1 to 2, row 3 to 4 and row 5 to 6 using "range" command? Thank you. |
All times are GMT +1. The time now is 09:48 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com