With worksheets("Sheet1")
.Activate
if isemtpy(.range("a1")) then
.range("a1").Activate
else
.cells(rows.count,1).End(xlup)(2).Activate
End if
End With
--
Regards,
Tom Ogilvy
"Rune_Daub " wrote in message
...
A simple question.
When i press s userform commandbutton, I want it to activate the first
empty cell in the A collumn..
But how??
I can figure out as much as range(xxxxx).activate... But how do I get
it to recognise the first empty cell?
I have thought of a countv(A:A)+1
But I cant get it to work properly..
Rune Daub
---
Message posted from http://www.ExcelForum.com/