Форум по VBA и MS Office

Как узнать имя документа с помощью макроса?

Макрос работает с активным документом (это документ, который пользователь видит на мониторе).

Sub Macro()

    MsgBox ActiveDocument.Name, vbInformation

End Sub

спасибо