"... А в случае VBA, когда нет exe-шника?"

With Application.VBE.ActiveCodePane
.GetSelection StartLine, Startcolumn, EndLine, EndColumn
CurrentProc = .CodeModule.ProcOfLine(StartLine, vbext_pk_Proc)
End With

My pleasure

... Таким методом конечно можно, я про метод, когда из любой процедуры одной функцией узнать имя процедуры...

Такое сделать можно, но вы наврядли это захотите. Сложно. Плюс требуется особая компиляция для создания PDB файла (опция Create Cymbolic Debug Info). Вот здесь описано (на английском), как такое делается:

http://www.fawcette.com/vsm/2002%5F05/magazine/columns/blackbelt/

Регистрация бесплатна и занимает 2 секунды.

Там используются АПИ функции. Например эта:

Private Declare Function StackWalk Lib _
"dbghelp" (ByVal MachineType As _
Long, ByVal hProcess As Long, _
ByVal hThread As Long, ByRef _
StackFrame As StackFrame, ByVal _
ContextRecord As Long, ByVal _
ReadMemoryRoutine As Long, ByVal _
FunctionTableAccessRoutine As Long, _
ByVal GetModuleBaseRoutine As Long, _
ByVal TranslateAddress As Long) As Long


Полный код автора я не нашел. Но там его адрес, можете попросить самого автора. Статья с подробным описанием метода и кусками кода написана Dan Fergus и называется Get Debug Info From Production Apps. Написана для журнала Visual Studio в 2002 году.

VladConn

ОК. Там, на самом деле, можно сгрузить и код. Я сейчас это сделал, но, похоже, они что-то там напутали. Какой-то другой код, не от статьи.

Я им только что отослал email с просьбой отыскать для меня нужный файл, это их вина. Посмотрим, все таки статье четыре года.