2009-05-29 1 views

ответ

2

От UI - перейти к нужному листа и перейдите в меню Файл -> Печать

С помощью VBA -

Call Worksheets("MySheet").PrintOut 

или

Call MySheet.PrintOut 

или если у вас есть более чем один

Dim shts As New Collection 
Call shts.Add(Sheet1) 
Call shts.Add(Sheet3) 
Call shts.Add(Sheet5) 

Dim sht As Worksheet: For Each sht In shts 
    Call sht.PrintOut 
Next sht 
0

Кликните по ksheet, который вы хотите распечатать, выберите печать и под печатью нажмите «активный лист».

Полная информация здесь - MS Office Help Page for Excel printing.

+0

«Активный лист» - это выбор по умолчанию –

+0

Вы также можете нажать Ctrl-левый или щелкнуть левой кнопкой мыши по именам вкладок, чтобы группировать листы перед печатью – barrowc

0

Он работает как массив тоже:


Thisworkbook.Sheets (массив ("Лист1", "Sheet3", "Sheet5")) отпечатком

или:.

дим arString (от 1 до 3) в виде строки

arString (1) = "Лист1"
arStri нг (2) = "Лист3"
arString (3) = "Sheet5"

Thisworkbook.Sheets (arString) .Printout

В любом случае будет работать.