Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako natisniti vse liste, razen enega posebnega lista v Excelu?

Pri delu z Excelom so lahko tiskalni listi splošna vsakodnevna opravila za vas. Vendar ste že kdaj poskusili natisniti vse liste, ampak enega posebnega lista? Na primer, delovni zvezek tukaj, želite natisniti vse liste, vendar list z imenom »Skupaj«, kako ga lahko hitro rešite?

Natisnite ves list, razen enega z VBA

Natisnite določene strani, ki jih potrebujete v programu Kutools for Exceldobra ideja3


Natisnite ves list, razen enega z VBA


Tukaj je koda VBA, ki lahko natisne vse liste, razen enega posebnega lista.

1. Vključite delovni zvezek, ki ga želite natisniti, in pritisnite Alt + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. klik Vstavi > module, prilepite koda pod modulom.

VBA: tiskalni list, razen enega

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

doc natisni vse, razen 1

Opomba: V kodi je Skupaj za plačilo in Če je xWs.Name <> "Skupaj", potem in MsgBox "Skupni listi niso natisnjeni" je ime lista, ki ga ne želite natisniti, in A1: B15 in .PrintArea = "A1: B15" je obseg, ki ga želite natisniti za vsak list. Če jih potrebujete, jih lahko spremenite.

3. Pritisnite F5 ključ za zagon kode, nato pa se odpre pogovorno okno, ki vas opominja, da določen list ni bil natisnjen. Prikaz slike:
doc natisni vse, razen 2

4. klik OK zaprete pogovorno okno.


Natisnite določene strani, ki jih potrebujete v programu Kutools for Excel

Če želite le natisniti samo čudne ali neparne strani ali določene strani lista, lahko uporabite Kutools za ExcelJe Natisni določene strani uporabnost, ki vam lahko hitro pomaga.

Kutools za Excel, z več kot 120 priročne funkcije, olajšajo vaše delo.

Po namestitvi Kutools za Excel, prosimo, naredite spodaj :(Brezplačno prenesete Kutools za Excel zdaj!)

1. Vključite list, v katerem želite natisniti določene strani, kliknite Podjetje > Tiskanje > Natisni določene strani. Prikaz slike:
doc natisni vse, razen 3

2. Potem v Natisni določene strani pogovorno okno, preverite možnosti, ki temeljijo na vaši potrebi tiskanja. Prikaz slike:
doc natisni vse, razen 4

3. klik Tiskanje za tiskanje strani.

Nasvet. Če želite brezplačno preizkusiti funkcijo Print Specified Pages, prosimo, pojdite na brezplačno prenesete Kutools za Excel najprej in pojdite, da uporabite operacijo v skladu z zgornjimi koraki.


Priporočena orodja za produktivnost za Excel

zavihek kte 201905

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.