Thanks Mike, just the job. As you'll see in earlier post, had to change
xlLeft to xlToLeft.

Rob
"Mike H" wrote in message
...
Rob,

I'm not sure i fully underatand what your asking but to return the column
number os the last used col in a row use.

LastCol = Cells(1, Columns.Count).End(xlToLeft).Column

The 1 represents row 1

--
Mike

When competing hypotheses are otherwise equal, adopt the hypothesis that
introduces the fewest assumptions while still sufficiently answering the
question.


"Rob" wrote:

Hi,

I have used a similar piece of code to find the last row of data by going
to
the last row in the sheet and then moving up to the last row containing
data. I want to do the same albeit go to the far most column then go
left
to fing the last column with data.

Cells(1,Columns.Count).Select takes me to the last column but adjusting
to
the below, just errors.

dim ColNum as Single
ColNum = Cells(1,Columns.Count).End(xlLeft).Select
Any pointers most welcome. Rob


.