Ел
Елена

как в VBA получить путь открытого документа в word

Application.Options.DefaultFilePath - дает путь к папке с: \users\..\appdata\roaming и тд
а мне надо тот каталог где лежал файл

Андрей Савченко
Андрей Савченко

Документов может быть открыто несколько.
У Application есть массив-коллекция Documents
http://msdn.microsoft.com/ru-ru/library/microsoft.office.interop.word.documents_members.aspx

Каждый член этого массива Document
http://msdn.microsoft.com/ru-ru/library/microsoft.office.interop.word.document_members.aspx

У каждого Document есть FullName (полное имя)
http://msdn.microsoft.com/ru-ru/library/microsoft.office.interop.word._document.fullname.aspx
И
Path (путь)
http://msdn.microsoft.com/ru-ru/library/microsoft.office.interop.word._document.path.aspx

Sub Test
Dim d

For Each d in Application.Documents
MsgBox d.FullName & " : " & d.Path
Next

End Sub

Если нужен активный документ, то
Application.ActiveDocument
http://msdn.microsoft.com/ru-ru/library/microsoft.office.interop.word._application.activedocument.aspx

MsgBox Application.ActiveDocument.Path

MA
Moskalev Anton

ActiveDocument.Name
ActiveDocument.FullName

ActiveDocument.Path

Марина Комарова
Марина Комарова

How about google it in English? Thousands of links are waiting for you…
For example:
http://software-solutions-online.com/2014/06/01/word-vba-get-current-file-path-and-name/

Похожие вопросы
Как сохранить стили документа Word 2003 при открытии егов Word 2007?
Можно ли открыть документ Word 2007, если есть Word 2010?
Помогите с VBA(MC Word 2007)
помогите с vba (ms word 2007)
Как сделать, чтобы макрос, написанный в VBA в Word 2010 запускался при создании нового документа?
Word документ в HTML
как копировать таблицу в word из одного документа в другой, чтобы она не изменила размер? (оба документа word)
При открытии документа в Word он запускается не полностью.
VBA Задать ожидание открытия окна
В word 2013 при открытии 2х документов не работает надстройка