find next blank cell

N

Nancy

i'm taking data from different sheets and pasting them into a new sheet. i was trying to create code that will let me find the next blank area in column A so i can paste data from 1 sheet into the next empty cell. Tks for the assistance.
 
G

Gord Dibben

Nancy

Sub findbottom()
Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUp) _
.Offset(1, 0).Activate
End Sub

Gord Dibben Excel MVP
 
B

Bob Phillips

Next is

Worksheets("Sheet1").Range("A1").End(xlDown).offset(1,0)

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

Nancy said:
i'm taking data from different sheets and pasting them into a new sheet. i
Click to expand...
was trying to create code that will let me find the next blank area in
column A so i can paste data from 1 sheet into the next empty cell. Tks for
the assistance.
 
Top