Номер столбца ячейки

[a2alex]

Нужна помощь
Необходимо в функции макроса прописать номер ячейки.

Function rr()
rr = ActiveCell.Column
end function

вношу эту функцию в ячейку: =rr()
выводит номер столбца, но когда протягиваю эту функцию по ряду, то выводятся одинаковые номера!!

подскажите, есть ли какой-то другой способ для вытягивания номера столбца????
например, как использовать в VBA стандартную функцию =СТОЛБЕЦ(), которая без проблем "тянется" по всем рядам и колонкам (что-то вроде Application.WorksheetFunction.Row) ????

[EducatedFool]

когда протягиваю эту функцию по ряду, то выводятся одинаковые номера!!

Вот так попробуйте:

Function rr()
    ' Application.Volatile True    ' автопересчёт функции (не обязательно)
    rr = Application.Caller.Column
    ' Application.Caller - ссылка на ячейку, откуда вызвана функция
End Function

PS: А зачем так извращаться?
Есть же формула =СТОЛБЕЦ()... чем она не устраивает?

[SAS888]

Еще вариант:

Function rr()
    rr = Application.ThisCell.Column
End Function

[IgorGO]

PS: А зачем так извращаться?
Есть же формула =СТОЛБЕЦ()... чем она не устраивает?

Игорь,
а как осваивать ВБА? только так: ставим перед собой учебные задачи и решаем их, а потом дело и практических задач дойдет.

a2alex,
СТОЛБЕЦ() - это то, что доктор прописал. надежная функция, проверенная, не дает сбоев при протягивании по ряду.