Range syntax
 

How come this piece of code does not work?

Dim Headers As Range
Set Headers = Range(Cells(ImNavigateRow - 1, 2), Cells(ImNavigateRow - 1,
2).End(xlToRight).Column)

I get an: Method 'Range' of object '_worksheet' failed error.

Can anyone correct this for me?
Thanks
The Doctor

Range syntax
 

Perhaps this is what you are trying to do?
Set Headers = Range(Cells(ImNavigateRow - 1, 2), Cells(ImNavigateRow - 1,
Cells(ImNavigateRow-1,2).End(xlToRight).Column))

"Dr.Schwartz" wrote:

How come this piece of code does not work?

Dim Headers As Range
Set Headers = Range(Cells(ImNavigateRow - 1, 2), Cells(ImNavigateRow - 1,
2).End(xlToRight).Column)

I get an: Method 'Range' of object '_worksheet' failed error.

Can anyone correct this for me?
Thanks
The Doctor

Range syntax
 

Hi Dr. Schwartz,

Try:

Set Headers = Range(Cells(ImNavigateRow - 1, 2), _
Cells(ImNavigateRow - 1, 2).End(xlToRight))


---
Regards,
Norman



"Dr.Schwartz" wrote in message
...
How come this piece of code does not work?

Dim Headers As Range
Set Headers = Range(Cells(ImNavigateRow - 1, 2), Cells(ImNavigateRow - 1,
2).End(xlToRight).Column)

I get an: Method 'Range' of object '_worksheet' failed error.

Can anyone correct this for me?
Thanks
The Doctor

Range syntax
 

Yes thank you it works, but I think I'm going to use Norman's solution (is't
shorter)

"K Dales" wrote:

Perhaps this is what you are trying to do?
Set Headers = Range(Cells(ImNavigateRow - 1, 2), Cells(ImNavigateRow - 1,
Cells(ImNavigateRow-1,2).End(xlToRight).Column))

"Dr.Schwartz" wrote:

How come this piece of code does not work?

Dim Headers As Range
Set Headers = Range(Cells(ImNavigateRow - 1, 2), Cells(ImNavigateRow - 1,
2).End(xlToRight).Column)

I get an: Method 'Range' of object '_worksheet' failed error.

Can anyone correct this for me?
Thanks
The Doctor

Range syntax
 

As always (2 for 2) you deliver, thank you Norman.

"Norman Jones" wrote:

Hi Dr. Schwartz,

Try:

Set Headers = Range(Cells(ImNavigateRow - 1, 2), _
Cells(ImNavigateRow - 1, 2).End(xlToRight))


---
Regards,
Norman



"Dr.Schwartz" wrote in message
...
How come this piece of code does not work?

Dim Headers As Range
Set Headers = Range(Cells(ImNavigateRow - 1, 2), Cells(ImNavigateRow - 1,
2).End(xlToRight).Column)

I get an: Method 'Range' of object '_worksheet' failed error.

Can anyone correct this for me?
Thanks
The Doctor