ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Подставить путь открытого документа в макросе
3 сообщений из 3, страница 1 из 1
Подставить путь открытого документа в макросе
    #39491084
lexxora
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lexxora
Гость
Оригинал
Код: plsql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Sub Export_PDF_Order()
 
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:="C:\TEMP\Order.pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End Sub



А нужно что то подобное:
Полное_имя_файла_с_расширением_и_местом_его_нахождения = ActiveDocument.FullName

но как его присвоить?

Код: plsql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Sub Export_PDF_Order()
 
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:=ActiveDocument.FullName, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End Sub
...
Рейтинг: 0 / 0
18.07.2017, 18:04
| Ответить | Цитировать | Написать  
Подставить путь открытого документа в макросе
    #39491114
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
ThisWorkbook.FullName
...
Рейтинг: 0 / 0
18.07.2017, 18:49
| Ответить | Цитировать | Написать  
Подставить путь открытого документа в макросе
    #39491490
lexxora
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lexxora
Гость
То что доктор прописал.
Спасибо
...
Рейтинг: 0 / 0
19.07.2017, 12:28
| Ответить | Цитировать | Написать  
3 сообщений из 3, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Подставить путь открытого документа в макросе
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]