Здравствуйте, подскажите, пожалуйста, почему
Worksheets(Workbooks("Требование.xlsx").Sheets("Печать").[D11]).PrintOut From:=1, To:=1, Copies:=1
не печатается.
В Workbooks("Требование.xlsx").Sheets("Печать").[D11] указано название листа, который нужно распечатать.
Спасибо!
...Cells(11,4).Value).PrintOut From:=1, To:=1, Copies:=1
Зачем такой длинный путь? ячейка в другой книге?
Ячейка в этой же книге, что и листы для печати. А макрос - в общей книге макросов.
Вот, что получилось в итоге (название листа с ячейкой все-таки не "Сервис", а "Формулы6.0")
Workbooks("Требование.xlsx").Worksheets(Workbooks("Требование.xlsx").Sheets("Формулы6.0").Cells(11, 5).Value).PrintOut From:=1, To:=1, Copies:=1
Но теперь возникает странная ситуация:
начинается печать, но она тут же прерывается, так как на экран выводится окно "Сохранить как".
Почему так происходит?
Разобрался. Вот что получилось:
[/Workbooks("Требование.xlsx").Activate
Worksheets(Cells(11, 5).Value).PrintOut From:=1, To:=1, Copies:=1
А окно сохранения документа возникало из-за того, что к ноутбуку не подключен принтер.
Модераторов прошу меня извинить: никак не научусь правильно оформлять код в отдельном окне.