Przejdź do głównej zawartości

Jak szybko zamknąć wszystkie skoroszyty oprócz aktywnego?

Jeśli na komputerze jest otwartych wiele skoroszytów, a teraz chcesz zamknąć wszystkie oprócz aktywnego. Czy są jakieś szybkie sposoby radzenia sobie z tą pracą, oprócz zamykania innych skoroszytów jeden po drugim? W tym artykule omówię kilka prostych sposobów rozwiązania tego problemu jednym kliknięciem.

Zamknij wszystkie skoroszyty z wyjątkiem aktywnego z kodem VBA

Zamknij wszystkie skoroszyty oprócz aktywnego za pomocą zakładki Office


strzałka niebieski prawy bąbelek Zamknij wszystkie skoroszyty z wyjątkiem aktywnego z kodem VBA

Za pomocą następującego kodu VBA możesz szybko zamknąć wszystkie otwarte skoroszyty oprócz aktywnego, wykonaj następujące czynności:

1. Aktywuj skoroszyt, który chcesz zachować otwarty.

2. Przytrzymaj ALT + F11 klawisze, aby otworzyć Okno Microsoft Visual Basic for Applications.

3. Kliknij wstawka > Modułi wklej następujący kod w Okno modułu.

Kod VBA: zamknij wszystkie skoroszyty z wyjątkiem aktywnego

Private Sub CloseOtherWorkbook()
'Update 20141126
Dim xWB As Workbook
Application.ScreenUpdating = False
For Each xWB In Application.Workbooks
    If Not (xWB Is Application.ActiveWorkbook) Then
        xWB.Close
    End If
Next
Application.ScreenUpdating = True
End Sub

4. Następnie naciśnij F5 klucz, aby uruchomić ten kod, a następnie wszystkie inne skoroszyty zostały zamknięte na raz, ale pozostawiono tylko aktywny.


strzałka niebieski prawy bąbelek Zamknij wszystkie skoroszyty oprócz aktywnego za pomocą zakładki Office

Jeśli jesteś zainteresowany nowym produktem - Karta Office, może pomóc ci otworzyć wiele dokumentów / plików w jednym oknie z zakładkami, dzięki czemu możesz zamknąć wszystkie skoroszyty, ale pozostawić aktywny jednym kliknięciem. Możesz dowiedzieć się więcej i pobrać plik Karta Office od tutaj.

Po zainstalowaniu Karta Office, zobaczysz, że wszystkie otwarte skoroszyty są wyświetlane w jednym oknie z zakładkami, zobacz zrzut ekranu:

doc-zamknij-inne-zeszyty-1

Następnie kliknij nazwę skoroszytu, który chcesz pozostawić otwarty, i kliknij prawym przyciskiem myszy kartę nazwy, a następnie wybierz Zamknij Inne z menu kontekstowego, zobacz zrzut ekranu:

doc-zamknij-inne-zeszyty-1

Następnie możesz zobaczyć, że otwarty jest tylko aktywny skoroszyt.


Podobne artykuły:

Jak szybko zamknąć wszystkie skoroszyty w programie Excel?

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 (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
can the macro be modified to close microsoft publisher files
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations