Hogyan lehet kinyomtatni az összes lapot, egy adott lap kivételével, az Excel programban?

Az Excel-munkában a lapok nyomtatása lehet az általános napi munka az Ön számára. Azonban megpróbált már egyetlen lapot kinyomtatni, kivéve egy adott lapot? Például itt egy munkafüzetet, amelyben az összes lapot ki szeretné nyomtatni, kivéve az „Összesen” nevű lapot, hogyan tudja gyorsan kezelni?

Az összes lap kinyomtatása, kivéve a VBA-t

Nyomtasson ki bizonyos szükséges oldalakat a Kutools for Excel programmal

---

Az összes lap kinyomtatása, kivéve a VBA-t

Itt van egy VBA kód, amely egy adott lap kivételével minden lapot kinyomtathat.

1. Aktiválja a lapokat kinyomtatni kívánt munkafüzetet, majd nyomja meg az gombot Alt + F11 gomb a Microsoft Visual Basic for Applications ablak.

2. kettyenés betétlap > module, illessze be a kód alatt a Module parancsfájlt.

VBA: Nyomtatási lap, az egyik kivételével

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

Jegyzet: A kódban az Végösszeg in Ha xWs.Name <> "Összesen" Akkor és a MsgBox "A lap nem lett kinyomtatva" annak a lapnak a neve, amelyet nem akar nyomtatni, és A1: B15 in .PrintArea = "A1: B15" az egyes lapok nyomtatási tartománya. Szükség szerint megváltoztathatja őket.

3. nyomja meg F5 gombot a kód futtatásához, majd megjelenik egy párbeszédpanel, amely emlékeztet arra, hogy az adott lapot nem nyomtatták ki. Lásd a képernyőképet:

4. kettyenés OK a párbeszéd bezárásához.

---

Nyomtasson ki bizonyos szükséges oldalakat a Kutools for Excel programmal

Ha csak páros vagy páratlan oldalakat vagy egy lap meghatározott oldalait szeretné kinyomtatni, akkor jelentkezhet Kutools az Excel számára'S A megadott oldalak nyomtatása segédprogram, amely gyorsan megtehet egy szívességet.

Telepítése után Kutools for Excel, kérjük, tegye a következőket :(Ingyenes letöltés Kutools for Excel most!)

1. Aktiválja azt a lapot, amelyen bizonyos oldalakat nyomtatni szeretne, kattintson a gombra Kutools Plus > Nyomtatás > A megadott oldalak nyomtatása. Lásd a képernyőképet:

2. Ezután a A megadott oldalak nyomtatása párbeszédpanelen ellenőrizze a beállításokat a nyomtatási igény alapján. Lásd a képernyőképet:

3. kettyenés az oldalak kinyomtatásához.

Tipp. Ha ingyenes próbaverziót szeretne kapni a Specifikált oldalak nyomtatása funkcióról, kérjük, keresse fel a Kutools for Excel ingyenes letöltését először, majd lépjen a művelet végrehajtására a fenti lépések szerint.