That code line should have all been on one line.

Cells(Range("J7").End(xlDown).Row, Columns.Count).End(xlToLeft).Offset(,
1).Select

--
Rick (MVP - Excel)



"Rick Rothstein" wrote in message
...
If I understand your question correctly, this should do what you want...

Cells(Range("J7").End(xlDown).Row, Columns.Count).End(xlToLeft).Offset(,
1).Select

--
Rick (MVP - Excel)


"Munchkin" wrote in message
...
I want my macro to select J7, go to the record end, then go across to the
next cell, which is empty. As you can see when I recorded my macro it
referenced a specific cell instead (K751). Hope I explained clearly -
thanks
in advance for help.

Range("J7").Select
Selection.End(xlDown).Select
Range("K751").Select