Страницы: 1
RSS
Вывод листа на печать без изображения
 
Можно ли при помощи макроса вывести на печать лист без изображения?
Если такое возможно, прошу помочь дописать макрос печати
В примере, в лист книги вставлено изображение, необходимо, что бы печать листа была БЕЗ изображения, удаление изображения не подходит, т.к. я сохраняю лист в формате PDF (с изображением)
Сейчас у меня на подобные трудности два одинаковых листа, один с изображением, другой без, и два макроса один на сохранение листа в PDF и на печать соответственно
Хочу сделать один лист, а дубликаты удалить, и в перспективе применять метод с одним листом
 
Если в свойствах рисунка снять галочку "Вывод объекта на печать", так не подойдет?
Вредить легко, помогать трудно.
 
Код
Sub ПечатьЛист1()
    Application.ScreenUpdating = False
    Sheets(1).DrawingObjects.Visible = False
    Sheets(1).PrintOut
    Sheets(1).DrawingObjects.Visible = True
    Application.ScreenUpdating = True
End Sub
 
Behruz A.N., при Вашем способе, PDF сохраняется без изображения, мне так не подходит
Изменено: Роман - 02.04.2022 05:47:50
 
RAN, идеально, спасибо большое за помощь
Изменено: Роман - 02.04.2022 05:48:03
Страницы: 1
Наверх