Last column to right

[Fire_Chief]

I am trying to find the last column to the right of the active cell that has a value even if there are blank columns between them.
The activecell would always be in column A

I can do it with a column and find the last row by using.... LAST_ROW = Cells(Rows.Count, 1).End(xlUp).Row

I thought it would be similar it I guess it isn't.

 

[Fluff]

How about

Cells(ActiveCell.Row, Columns.Count).End(xlToLeft).Column

 

[Fire_Chief]

That worked great and I have been trying for over and hour.
Is there any way that can return the address of the last column (cell) instead of a number.
I use it to select a range of cells.

If not I will convert it.

 

[Fluff]

Change it from .Column to .Address

 

[Fire_Chief]

Thank you so much. You have helped me often

 

[Fluff]

You're welcome & thanks for the feedback