Добрый день.
Подскажите, пожалуйста, как написать VBA для печати PDF в PDF формат с функцией "Печать в градациях серого (черно-белая)".
У меня по макросу выгружаются в файл все названия PDF файлов, находящиеся в папке.
Их необходимо поочереди открыть и сохранить с этой функцией.
Я нашла VBA на открытие файла, на печать не могу найти. Благодарю
Подскажите, пожалуйста, как написать VBA для печати PDF в PDF формат с функцией "Печать в градациях серого (черно-белая)".
У меня по макросу выгружаются в файл все названия PDF файлов, находящиеся в папке.
Их необходимо поочереди открыть и сохранить с этой функцией.
Я нашла VBA на открытие файла, на печать не могу найти. Благодарю
Код |
---|
Sub openPDF() Dim Path As String Path = "C:\Users\ta.tavanova\Desktop\ÍÄÑ\1111.pdf" ActiveWorkbook.FollowHyperlink Path End Sub |