Last Column
 

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

Last Column
 

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

Last Column
 

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


.

Last Column
 

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

Last Column
 

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


.

Last Column
 

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


.



.