Как создать PDF файл с именем ZAKAZ

Как создать PDF файл с именем ZAKAZ_(дата сегодня).pdf

LV112 Гость	#1 18.01.2011 02:36:27 Как создать из "Excel таблицы" - PDF файл с именем ZAKAZ_(дата сегодня).pdf при помощи макроса?

EducatedFool Пользователь Сообщений: 3695 Регистрация: 23.12.2012	#2 18.01.2011 06:12:54 Какую версию Excel используете? Если Excel 2007 - то всё просто (одна строка кода) Если Excel 2003 - то надо устанавливать виртуальный ПДФ принтер Надстройки для Excel Парсинг сайтов Мониторинг цен конкурентов

Guest Гость	#3 18.01.2011 07:40:37 {quote}{login=EducatedFool}{date=18.01.2011 06:12}{thema=}{post}Какую версию Excel используете? Если Excel 2007 - то всё просто (одна строка кода) Если Excel 2003 - то надо устанавливать виртуальный ПДФ принтер{/post}{/quote} если 2007.

Guest Гость	#4 18.01.2011 07:43:05 и для 2003, то же поясните как делать....

LV112 Гость	#5 18.01.2011 12:22:52 EXCEL 2007

LV112 Гость	#6 18.01.2011 18:47:15 подскажите пожалуйста решение, тем более, что оно простое (Ексель 2007)

EducatedFool

Пользователь

Сообщений: 3695 Регистрация: 23.12.2012

18.01.2011 18:57:39

Чтобы файл получил такое имя: ZAKAZ_18_января_2011.pdf

запустите этот макрос в Excel2007:

Sub Макрос1()
' сложнейший макрос, записанный макрорекордером за 5 секунд
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\ZAKAZ_" & Format(Now, "DD_MMMM_YYYY") & ".pdf"
End Sub

Надстройки для Excel Парсинг сайтов Мониторинг цен конкурентов

Михаил С. Пользователь Сообщений: 10514 Регистрация: 21.12.2012	#8 18.01.2011 19:08:45 ЕМНИП, в 2007 тоже нет преобразования в .pdf по умолчанию. Надстройку нужно ставить (бесплатная, на сайте майкрсофта)

Igor67

Пользователь

Сообщений: 3785 Регистрация: 21.12.2012

18.01.2011 22:19:03

2 Михаил, изменяет:) ОФ2007 самый младшенький Домашний и студенческий спокойно сохранил лист.
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"D:\Rabochij\DownLoad\Книга1.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True

LV112 Гость	#10 18.01.2011 23:06:56 Спасибо, все работает! Для наглядности пример Прикрепленные файлы post_191724.xls (57.5 КБ)

LV112 Гость	#11 18.01.2011 23:10:11 Ексель 2007 Прикрепленные файлы post_191728.xlsm (25.87 КБ)

Guest

Гость

#12

19.01.2011 23:56:48

{quote}{login=EducatedFool}{date=18.01.2011 06:57}{thema=}{post}Чтобы файл получил такое имя: ZAKAZ_18_января_2011.pdf

запустите этот макрос в Excel2007:

Sub Макрос1()
' сложнейший макрос, записанный макрорекордером за 5 секунд
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\ZAKAZ_" & Format(Now, "DD_MMMM_YYYY") & ".pdf"
End Sub{/post}{/quote}

Как в текст макроса добавить "область печати" и PDF только активного листа?, а то при длинном списке делает PDF из всех данных в файле.

LV112 Гость	#13 23.01.2011 20:45:59 Как в текст макроса добавить "область печати" и PDF только активного листа?, а то макрос делает PDF из всех данных в файле включая все вкладки.

Jnas Пользователь Сообщений: 38 Регистрация: 01.01.1970	#14 24.01.2011 12:34:54 Не помню где качал , скорее всего от PDF Transformer есть там принтер pdf-xchange 4.0 for Abbyy Далее по этому принтеру: "Свойства" - "Сохранение" - "Макрос" или сразу вкладке "Сохранение" и в поле "Имя файла" вписать "ZAKAZ_%[Date]"

Читают тему