Range with .End(xltoleft) problem

[Certified]

Hi

I am trying to write a simple code to count the number of columns in a range. However I am having an issue determining the range.

Range(Cells(RowCnt, COlcnt).End(xlToLeft).Select

When I run this code, I get a "run-time error '1004."

I can't for the life of me figure out what i am doing wrong.

Please help.

Thanks

 

[BarryL]

try the below. 4 represents the row number. change as needed. this will identify the number of columns in your spreadsheet, this can then be used to select the last column if needed

lc = Cells(4, Columns.Count).End(xlToLeft).Column

 

[Rick Rothstein]

Range(Cells(RowCnt, COlcnt).End(xlToLeft).Select

When I run this code, I get a "run-time error '1004."

Count your opening and closing parentheses... the Cells object has an open/close pair, the End object has an open/close pair, but the Range object only has an open parenthesis... it is missing its close parenthesis.

 

[Certified]

Count your opening and closing parentheses... the Cells object has an open/close pair, the End object has an open/close pair, but the Range object only has an open parenthesis... it is missing its close parenthesis.

Hi,

I am still getting an error.

 

[Certified]

Thanks, I think this will work.

 

[Rick Rothstein]

I am still getting an error.

Without seeing the rest of your code, it is hard to know the code line you posted is supposed to be doing for your overall procedure. Personally I hate selecting cells just to operate on them (it makes your code sloppy and slow), but looking more closely at what you posted, I am thinking you do not need the Range call at all (unless you left some other references out of it... again, can't know that without seeing the rest of your code), so this may be what you want...

Cells(RowCnt, COlcnt).End(xlToLeft).Select