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

ColNum = Cells(1,Columns.Count).End(xlLeft).Column

HTH

Bob


"Rob" wrote in message
...
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

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


.

Bob,

Initially the code didn't work but changing End(xlLeft) to End(xlToLeft) all
is working. I run in verison 2007 so wonder whether this is the reason for
a change being required?

Thanks, Rob

"Bob Phillips" wrote in message
...
ColNum = Cells(1,Columns.Count).End(xlLeft).Column

HTH

Bob


"Rob" wrote in message
...
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

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


.

Gald I could help but note

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

Not for my solution you didn't
--
Mike

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


"Rob" wrote:

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


.



.