Im trying to select the next blank cell in a worksheet,
using "Selection.End(x1Down).select". When the Macro is
run I get an error message "Application Defined or Object
Defined Error.

I'm only a beginner, the code looks right from the
manual...

Ken,

Use xl(down) instead of x1(down).

hard to see the fonts, so in english.....
use X(letter L) not x(number one)

John

Ken Matthews wrote:

Im trying to select the next blank cell in a worksheet,
using "Selection.End(x1Down).select". When the Macro is
run I get an error message "Application Defined or Object
Defined Error.

I'm only a beginner, the code looks right from the
manual...

This macro stops at every empty cell in a column when run more than once.

Sub EmptyCell()
ActiveCell.Offset(1, 0).Select
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(1, 0).Select
Loop
End sub