Create a sign in sheet based on another tab

[Jriker1]

I have a list of people in Sheet1 starting in A2 and continuing down until the last person on the list.



On Sheet2, starting in A3, I have that same list. However for each populated field in column A from A3 on, it automatically creates a box around the A cell and the same B cell. So the name of the person and then the field they should sign their name in when showing up to the meeting. I'm having a problem automating what's in A2 down in Sheet 1 into A3 down in sheet 2. I've tried several methods and they always leave like zero's in the cells, then people tell you how to format the cells so they don't show. But technically there is something in those cells so the black box shows in those cells. Any way to have the content in Sheet1 A2 down populate in Sheet2 A3 down and only items that have content in Sheet1 Column A?


Thanks.


JR

 

[Jriker1]

By the way, I came up with this, that seems to work, but would love it to be automated when switching tabs:

Sub CopyCol()
Dim lr As Long

Application.ScreenUpdating = False
With Sheets("Sheet1")
lr = .Cells.Find("*", , xlValues, , xlByRows, xlPrevious).Row
.Range(.Cells(2, "A"), .Cells(lr, "A")).Copy Sheets("Sheet2").Cells(3, "A")
End With
Application.ScreenUpdating = True
End Sub