Przejdź do głównej zawartości

Jak wydrukować wszystkie arkusze z wyjątkiem jednego konkretnego arkusza w programie Excel?

W pracy w programie Excel drukowanie arkuszy może być dla Ciebie codzienną pracą. Jednak czy kiedykolwiek próbowałeś wydrukować wszystkie arkusze oprócz jednego konkretnego arkusza? Na przykład skoroszyt, w którym chcesz wydrukować wszystkie arkusze oprócz arkusza o nazwie „Razem”, jak szybko sobie z tym poradzić?

Wydrukuj cały arkusz oprócz jednego z VBA

Wydrukuj określone strony, których potrzebujesz, za pomocą Kutools for Exceldobry pomysł 3


Wydrukuj cały arkusz oprócz jednego z VBA

Oto kod VBA, który może drukować wszystkie arkusze z wyjątkiem jednego określonego arkusza.

1. Aktywuj skoroszyt, z którego chcesz wydrukować arkusze, i naciśnij Alt + F11 klucze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. kliknij wstawka > modułe, wklej poniższy kod do skryptu modułu.

VBA: Drukuj arkusz z wyjątkiem jednego

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 wydrukuj wszystko oprócz 1

Uwaga: W kodzie Kwota projektu: in Jeśli xWs.Name <> "Total" Then i MsgBox „Arkusz sumy nie został wydrukowany” to nazwa arkusza, którego nie chcesz drukować, a A1: B15 in .PrintArea = "A1: B15" to zakres, w jakim chcesz wydrukować każdy arkusz. Możesz je zmieniać według potrzeb.

3. naciśnij F5 aby uruchomić kod, a następnie wyskakuje okno dialogowe przypominające, że określony arkusz nie został wydrukowany. Zobacz zrzut ekranu:
doc wydrukuj wszystko oprócz 2

4. kliknij OK aby zamknąć okno dialogowe.


Wydrukuj określone strony, których potrzebujesz, za pomocą Kutools for Excel

Jeśli chcesz tylko wydrukować tylko strony parzyste lub nieparzyste lub określone strony arkusza, możesz złożyć wniosek Kutools dla programu Excel'S Drukuj określone strony narzędzie, które może szybko wyświadczyć ci przysługę.

Po zainstalowaniu Kutools dla programu Excel, wykonaj poniższe czynności :(Bezpłatne pobieranie Kutools dla programu Excel teraz!)

1. Aktywuj arkusz, w którym chcesz wydrukować określone strony, kliknij Kutools Plus > Druk > Drukuj określone strony. Zobacz zrzut ekranu:
doc wydrukuj wszystko oprócz 3

2. Następnie w Drukuj określone strony sprawdź opcje w zależności od potrzeb drukowania. Zobacz zrzut ekranu:
doc wydrukuj wszystko oprócz 4

3. kliknij wydrukować strony.

Wskazówka. Jeśli chcesz skorzystać z bezpłatnej wersji próbnej funkcji Drukuj określone strony, przejdź do bezpłatnego pobrania Kutools for Excel najpierw, a następnie przejdź do wykonania operacji zgodnie z powyższymi krokami.

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Opis


Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations