hi,

From the end of row or column , use ' end ' fucntion to get the last
filled cell
and use offset to get the next cell

like this one: by row
sub test()
range("A65536").end(xlup).offset(1,0)="Test"
end sub

try to run it several times.. to get the result...

--
Regards,

Halim



"Ed" wrote:

Does anyone know the VBA code where for a range of date you want to program
the macro to go to the next empty column or row?
--
EVZ