Jak szybko sprawdzić, czy plik (skoroszyt) jest otwarty czy zamknięty w programie Excel?

Codzienna praca w programie Excel polega na otwieraniu wielu skoroszytów jednocześnie do pracy, ale czasami setki skoroszytów mogą zepsuć Ci głowę, aby pamiętać, czy określony skoroszyt jest otwarty, czy zamknięty. Porzuć tradycyjną metodę sprawdzania plików jeden po drugim, tutaj przedstawiam ci sztuczki, aby szybko znaleźć skoroszyt jako otwarty lub zamknięty.

Sprawdź, czy skoroszyt jest otwarty lub zamknięty za pomocą VBA

Sprawdź, czy skoroszyt jest otwarty lub zamknięty w Kutools for Excel

Sprawdź, czy skoroszyt jest otwarty lub zamknięty za pomocą VBA

Oto kod VBA, który możesz uruchomić, aby sprawdzić, czy określony skoroszyt jest otwarty, czy zamknięty.

1. naciśnij Alt + F11 klucze do otwarcia Microsoft Visual Basic for Applications okno.

2. kliknij wstawka > Moduł a następnie skopiuj i wklej VBA do nowego Moduł okno.

VBA: Sprawdź, czy skoroszyt jest otwarty, czy zamknięty

Function IsWorkBookOpen(Name As String) As Boolean
    Dim xWb As Workbook
    On Error Resume Next
    Set xWb = Application.Workbooks.Item(Name)
    IsWorkBookOpen = (Not xWb Is Nothing)
End Function

Sub Sample()
    Dim xRet As Boolean
    xRet = IsWorkBookOpen("combine.xlsx")
    If xRet Then
        MsgBox "The file is open", vbInformation, "Kutools for Excel"
    Else
        MsgBox "The file is not open", vbInformation, "Kutools for Excel"
    End If
End Sub

3. I naciśnij F5 do uruchomienia tego VBA i pojawi się okno dialogowe przypominające, że określony skoroszyt jest otwarty, czy nie.
    

Wskazówka: W powyższym języku VBA „połączyć”To nazwa skoroszytu, którą chcesz sprawdzić, możesz to zrobić według potrzeb.

Sprawdź, czy skoroszyt jest otwarty lub zamknięty w Kutools for Excel

Jeśli nie znasz języka VBA, możesz sprawdzić, czy skoroszyt jest otwarty przez Kutools dla programu Excel, z jego Nawigacja okienko, które pomoże ci wyraźnie wyświetlić wszystkie otwarte skoroszyty na liście skoroszytów w okienku.

Po bezpłatna instalacja Kutools dla programu Excel, wykonaj poniższe czynności:

1. kliknij Kutools > Nawigacja aby włączyć okienko nawigacji. Zobacz zrzut ekranu:

2. Następnie kliknij Skoroszyt i arkusz , aby rozwinąć okienko, do którego chcesz przejść Skoroszyt i arkusz Sekcja. Możesz wyświetlić wszystkie otwarte skoroszyty na górnej liście. Zobacz zrzut ekranu:

Z Nawigacja okienku, możesz również szybko przełączać się między skoroszytami lub arkuszami na liście.

Kliknij tutaj, aby dowiedzieć się więcej o nawigacji.

Demo

---

Najlepsze narzędzia biurowe

Kutools dla programu Excel rozwiązuje większość problemów i zwiększa produktywność o 80%

• Ponowne użycie: Szybko włóż złożone wzory, wykresy i wszystko, czego używałeś wcześniej; Szyfruj komórki z hasłem; Utwórz listę mailingową i wysyłaj e-maile ...
• Pasek Super Formula (łatwo edytować wiele wierszy tekstu i formuły); Układ do czytania (łatwe odczytywanie i edytowanie dużej liczby komórek); Wklej do filtrowanego zakresu...
• Scal komórki / wiersze / kolumny bez utraty danych; Podziel zawartość komórek; Połącz zduplikowane wiersze / kolumny... Zapobiegaj zduplikowanym komórkom; Porównaj zakresy...
• Wybierz Duplikat lub Unikalny Wydziwianie; Wybierz puste wiersze (wszystkie komórki są puste); Super Find i Fuzzy Find w wielu zeszytach ćwiczeń; Losowy wybór ...
• Dokładna kopia Wiele komórek bez zmiany odwołania do formuły; Automatyczne tworzenie odniesień do wielu arkuszy; Wstaw punktory, Pola wyboru i nie tylko ...
• Wyodrębnij tekst, Dodaj tekst, Usuń według pozycji, Usuń przestrzeń; Tworzenie i drukowanie podsumowań stronicowania; Konwertuj zawartość komórek i komentarze...
• Super filtr (zapisz i zastosuj schematy filtrów do innych arkuszy); Zaawansowane sortowanie według miesiąca / tygodnia / dnia, częstotliwości i innych; Specjalny filtr pogrubieniem, kursywą ...
• Połącz skoroszyty i arkusze robocze; Scal tabele na podstawie kluczowych kolumn; Podziel dane na wiele arkuszy; Konwersja wsadowa xls, xlsx i PDF...
• Ponad 300 zaawansowanych funkcji. Obsługuje Office / Excel 2007-2021 i 365. Obsługuje wszystkie języki. Łatwe wdrażanie w przedsiębiorstwie lub organizacji. Pełne funkcje 30-dniowa bezpłatna wersja próbna. 60-dniowa gwarancja zwrotu pieniędzy.

Czytaj więcej... Darmowe pobieranie... Zakup... 

---

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!

Czytaj więcej... Darmowe pobieranie... Zakup...