Conas gach bileog a phriontáil seachas bileog shonrach amháin in Excel?

Agus tú ag obair in Excel, b’fhéidir gurb é bileoga priontála an post laethúil ginearálta duit. An ndearna tú iarracht riamh gach bileog a phriontáil ach bileog shonrach amháin? Mar shampla, leabhar oibre anseo, ba mhaith leat gach bileog a phriontáil ach an bhileog darb ainm “Iomlán”, conas is féidir leat é a láimhseáil go tapa?

Priontáil gach bileog seachas ceann le VBA

Priontáil leathanaigh áirithe a theastaíonn uait le Kutools le haghaidh Excel

---

Priontáil gach bileog seachas ceann le VBA

Seo cód VBA atá in ann gach bileog a phriontáil seachas bileog shonrach amháin.

1. Gníomhachtaigh an leabhar oibre is mian leat chun na bileoga a phriontáil, agus brúigh Alt + F11 eochracha chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. cliceáil Ionsáigh > modúle, greamaigh thíos an cód le script an Mhodúil.

VBA: Bileog Priontála seachas ceann amháin

Sub printsheets()
'UpdatebyExtendoffice20161031
 Dim xWs As Worksheet
 Application.ScreenUpdating = False
 For Each xWs In ThisWorkbook.Worksheets
  If xWs.Visible = True Then
   If xWs.Name <> "Total" Then
       With xWs.PageSetup
        .PrintArea = "A1:B15" ' USE YOUR PRINTAREA
        .Zoom = False
        .FitToPagesTall = 1
        .FitToPagesWide = 1
       End With
       xWs.PrintOut
   End If
  End If
 Next xWs
 Application.ScreenUpdating = False
 MsgBox "Sheet “Total” has not been printed", vbInformation, "Kutools for Excel"
End Sub

Nóta: Sa chód, tá an Iomlán in Más xWs.Name <> "Iomlán" Ansin agus MsgBox "Níor cuireadh Iomlán na mBileog i gcló" an t-ainm bileog nár mhaith leat a phriontáil, agus A1: B15 in .PrintArea = "A1: B15" an raon is mian leat a phriontáil de gach bileog. Is féidir leat iad a athrú de réir mar is gá duit.

3. Brúigh F5 eochair chun an cód a rith, agus ansin tagann dialóg amach le cur i gcuimhne duit nár cuireadh an bhileog shonrach i gcló. Féach an pictiúr:

4. cliceáil OK chun an dialóg a dhúnadh.

---

Priontáil leathanaigh áirithe a theastaíonn uait le Kutools le haghaidh Excel

Mura dteastaíonn uait ach leathanaigh cothrom nó corr, nó leathanaigh shonracha bileog, a phriontáil, is féidir leat iarratas a dhéanamh Kutools le haghaidh Excel'S Priontáil Leathanaigh Sonraithe fóntais ar féidir leat fabhar a dhéanamh go tapa.

Tar éis a shuiteáil Kutools for Excel, déan mar atá thíos le do thoil :(Íoslódáil saor in aisce Kutools le haghaidh Excel Anois!)

1. Gníomhachtaigh an bhileog inar mian leat leathanaigh áirithe a phriontáil, cliceáil Kutools Plus > Priontáil > Priontáil Leathanaigh Sonraithe. Féach an pictiúr:

2. Ansin sa Priontáil Leathanaigh Sonraithe dialóg, seiceáil na roghanna bunaithe ar do riachtanas priontála. Féach an pictiúr:

3. cliceáil Print chun na leathanaigh a phriontáil.

Leid. Más mian leat triail saor in aisce a bheith agat ar an bhfeidhm Priontáil Leathanaigh Sonraithe, téigh chuig Kutools le haghaidh Excel le híoslódáil saor in aisce ar dtús, agus ansin téigh chun an oibríocht a chur i bhfeidhm de réir na gcéimeanna thuas.