Excel: Copy active range to bottom of list

Trowa - Aug 11, 2009 at 09:09 AM
 Trowa - Aug 27, 2009 at 07:24 AM

On multiple sheets I have lists of peoples names. When I add a few new names on one sheet, I want a macro to copy-paste these names to the other sheets on the bottom of the list (i.e. the first empty cell).

Lets clearify,
Sheet 1 has names from A1 till A100. The same goes for sheets 2 till 10.
When I enter names in A101 till A105 and I select these, I would like the following to happen:
Copy active range, paste to the bottom of the list of sheets 2 till 10.

So what is the command to find the first empty cell of a column in VBA?

Best regards,

13 responses

venkat1926 Posts 1863 Registration date Sunday June 14, 2009 Status Contributor Last seen August 7, 2021 811
Aug 11, 2009 at 08:46 PM
try this macro

Sub test()
With Worksheets("sheet2")
.Cells(Rows.Count, "a").End(xlUp).Offset(1, 0).PasteSpecial
End With
Application.CutCopyMode = False
End Sub