Selection Range (until last filled cell) to the right

[cazdealer]

Hi,
what is the equivalent of this


Range("A1:B" & Range("A1").End(xlDown).Row).Select

but instead of selecting until the last filled cell to the bottom, I what to select until the last cell to the right...

to be more precise,

I want to select from A1 until GS2 (for exemple) ... If my last fill cell is GS1.

thanks

 

[Leith Ross]

Hello cazdealer,

To find the last column that has a entry use this code. The example is for row 1.

  Dim LastCol As Long

    LastCol = Cells(1, Columns.Count).End(xlToLeft).Column

Sincerely,
Leith Ross

 

[cazdealer]

How could I select from cell A1 until that last cell?
selecting that range...

 

[repairman615]

Hello,

try:

<font face=Courier New>Range("a1", Range("a1").End(xlToRight).Offset(1, 0)).Select</FONT>

 

[Leith Ross]

Hello cazdealer,

This will select cells in both rows 1 and 2.

  Range("A1" , Cells(1, Columns.Count).End(xlToLeft)).Resize(1, 2).Select

Sincerely,
Leith Ross

 

[cazdealer]

thanks a lot!