Range syntax

[Guest]

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

 

[Guest]

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))

 

[Norman Jones]

Hi Dr. Schwartz,

Try:

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

 

[Guest]

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

 

[Guest]

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