Ребята! В листе ведомость имеется кнопка сохранения в pdf, эта функция исполнялась для Excel 2007. При открытии в Excel 2003 данная функция не работает. Можно ли сделать так, чтобы при печати через виртуальный принтер присваивалось уникальное имя файлу, которое прописано в макросе для Excel 2007? Спасибо! Пробовал записать код через макрорекордер, получил следующее:
[vba]
Код
Sub Макрос1()
Application.ActivePrinter = "Adobe PDF (Ne02:)" ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _ "Adobe PDF (Ne02:)", Collate:=True End Sub
[/vba]
Хотелось бы, чтобы при срабатывании макроса открывалось диалоговое окно, где сразу прописано имя файла по формату FileName:="Ведомость дефектов " & Лист3.[C3] & " " & "зав. № " & Лист3.[C4] & " " & "рег. № " & Лист3.[C5] & " " & "(а" & Лист1.[D9] & ")", либо можно вовсе без диалоговых окон (попробуйте в Excel 2007, там все работает в автомате).
Простое добавление строки к полученному коду не помогает...
Всем спасибо!
Ребята! В листе ведомость имеется кнопка сохранения в pdf, эта функция исполнялась для Excel 2007. При открытии в Excel 2003 данная функция не работает. Можно ли сделать так, чтобы при печати через виртуальный принтер присваивалось уникальное имя файлу, которое прописано в макросе для Excel 2007? Спасибо! Пробовал записать код через макрорекордер, получил следующее:
[vba]
Код
Sub Макрос1()
Application.ActivePrinter = "Adobe PDF (Ne02:)" ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _ "Adobe PDF (Ne02:)", Collate:=True End Sub
[/vba]
Хотелось бы, чтобы при срабатывании макроса открывалось диалоговое окно, где сразу прописано имя файла по формату FileName:="Ведомость дефектов " & Лист3.[C3] & " " & "зав. № " & Лист3.[C4] & " " & "рег. № " & Лист3.[C5] & " " & "(а" & Лист1.[D9] & ")", либо можно вовсе без диалоговых окон (попробуйте в Excel 2007, там все работает в автомате).
Простое добавление строки к полученному коду не помогает...
Доброе время суток Судя по названию, вы пользуетесь Adobe Acrobat с ним ставится виртуальный принтер. Посмотрите в его ActiveX библиотеке (Tools/References) как отправлять на печать минуя диалоговое окно сохранения файла. Если такое существует (не знаю, не стоит, по идее должен, так как Adobe Acrobat имеет средства автоматизации). Можете воспользоваться PDFCreator, у него в папке, куда он установлен, лежит готовый пример управления печатью, вам останется только адаптировать его под свои нужды.
Доброе время суток Судя по названию, вы пользуетесь Adobe Acrobat с ним ставится виртуальный принтер. Посмотрите в его ActiveX библиотеке (Tools/References) как отправлять на печать минуя диалоговое окно сохранения файла. Если такое существует (не знаю, не стоит, по идее должен, так как Adobe Acrobat имеет средства автоматизации). Можете воспользоваться PDFCreator, у него в папке, куда он установлен, лежит готовый пример управления печатью, вам останется только адаптировать его под свои нужды.anvg
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
