Find Last Column

[alexaronson]

Hello and thank you for taking the time to review my question.,

I am trying to calculate the numerical value of the last Column with data in a work sheet from Cell A3 so that I can do some fun stuff to the right of it. I do not need to know the column locations such as A, B, AA, but rather, I need to know how many columns from A the last column resides in.

I know how to find the last row by using the following code:
LastRow = Range("B" & Rows.Count).End(xlUp).Row

However, when I try using the same logic for finding last column, I seem to not be able to return any values.

Any suggestions or advice would be greatly appreciated.

 

[Weaver]

lastcolumn = cells(3,columns.count).End(xltoleft).Column

should be the equivalent, based on row 3.

 

[hiker95]

alexaronson,

Dim LastColumn As Long, strColName As String

'Working in row 3, will return the last used column number
LastColumn = Cells(3, Columns.Count).End(xlToLeft).Column

'This will return the column Letter(s)
strColName = Replace(Cells(1, LastColumn).Address(0, 0), 1, "")

 

[alexaronson]

That is AWSOME!!!

Thanks for the help