column name

[oleg_v]

Hi

i need a macro that outputs me the name of the last filled column according to the row 3 sheet1


thanks

[Bob Phillips]

What defines the last filled column, do you mean the last one with data?

If so, try this ARRAY formula

=LEFT(ADDRESS(ROW(),MAX(IF(3:3<>"",COLUMN(3:3))),2),FIND("$",ADDRESS(ROW(),COLUMN(),2),1)-1)

[oleg_v]

hi
yes
the last column with data
can it be done with macro?
i can not use the array formula in my process


thanks

[Bob Phillips]

Why not? I know some companies restrict scripting, but formulas?

[Bob Phillips]

BTW, the VBA would be



Dim LastCol As Long

With ActiveCell

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

On Error Resume Next
MsgBox Split(Columns(LastCol).Address(, False), ":")(1)
On Error GoTo 0