if isempty(activecell.offset(1,0).value) then
'single cell under the activecell

or maybe...

if application.counta(activecell.resize(2,1)) 0 then
'at least one of the cells (activecell or the one below it) has something
'in it


Mik wrote:

I wish to establish if an offset RANGE contains text.

so, activecell and the cell below can be merged, and then populated.

something like....

if Range(ActiveCell.Offset(0, 0), ActiveCell.Offset(1, 0)).value is
nothing then
my macro
else
my macro
end if

Can anybody please help?

--

Dave Peterson