copy the same row from multiple sheets into one sheet in excel

Question

I need to copy the same row from multiple sheets into one row.

Example: I have an excel file with 5 sheets. I have to copy the 10th row (or the 15th row, or the 21th row

Answer 1

This code will copy 7th row from all first 5 sheets into 6th sheet.

Sub row_copy()

For i = 1 To Worksheets.Count - 1

Sheets(i).Rows(7).Copy Sheets(6).Cells(i, 1)

Next i

End Sub