Как я могу получить путь к диску текстового документа с помощью VBA? Document.Path вместо этого возвращает веб-путь

Question

У меня есть текстовый документ с некоторым кодом vba. Я хочу вернуть путь к каталогу, в котором сохранен текстовый документ.

Это код, который я использовал:

Dim PathCurrentDocument As Variant
PathCurrentDocument = ActiveDocument.path
Debug.Print PathCurrentDocument

Желаемый результат:

"C: \ Users \ firstname.lastname \ OneDrive - название компании \ VBA \ 4_update_documents_with_vba_inside_word \ document_templates_to_modify"

Я получаю веб-ссылку, которая выглядит следующим образом:

https://my-company.sharepoint.com/personal/my_name/Documents/VBA/4_update_documents_with_vba_inside_word/Document_A_Template_with_macro.docm

документация microsoft только говорит, что свойство возвращает дисковый или веб-путь к документу. Здесь не сказано, как выбрать, какой вернуть.

Answer 1

В зависимости от того, откуда поступает документ, свойство Document.Path возвращает дисковый или веб-путь к документу.

Используйте метод Document.SaveAs2 если вы хотите получить локальный путь к файлу. Обычно вам нужно сохранить файл на жестком диске где угодно.