Максим Сергеевич
СГ
Сергей Горкунов
Неужели у экселя сквозная нумерация?
А если попробовать выделить несколько листов и печатать выделенные?
Ну накрайняк запускайте макрос
Dim ws As Worksheet
Application.Dialogs(xlDialogPrint).Show
For i = 1 To Sheets.Count
Set ws = Sheets(i)
ws.Select
ws.PrintOut
Next i
Похожие вопросы