Przejdź do głównej zawartości

Jak uruchomić makro VBA podczas otwierania lub zamykania skoroszytu?

Autor: Sun Ostatnia modyfikacja: 2024-10-10

W wielu przypadkach możemy użyć kodu VBA do wykonania operacji, których nie obsługują wbudowane funkcje programu Excel. Ale czy kiedykolwiek próbowałeś uruchomić makro VBA za każdym razem, gdy otwierasz lub zamykasz skoroszyt? W tym artykule powiem ci, jak uruchomić kod VBA podczas otwierania lub zamykania skoroszytu za każdym razem.

Uruchom kod VBA po zamknięciu lub otwarciu skoroszytu


Uruchom kod VBA po zamknięciu lub otwarciu skoroszytu

1. Włącz skoroszyt, naciśnij Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Podwójne kliknięcie ThisWorkbook in Project - VBAProject okienko, aby otworzyć ThisWorkbook (kod) okno.
Kliknij dwukrotnie ThisWorkbook, aby otworzyć pusty moduł

2. W oknie kodu wybierz Podręcznik z ćwiczeniami z lewej listy rozwijanej. Zauważ, że domyślnie Otwarte pojawi się na rozwijanej liście po prawej stronie, jeśli nie, zmień ją na Otwarte.
wybierz Skoroszyt z listy rozwijanej po lewej stronie

3. Następnie skopiuj własny kod bez pierwszej i ostatniej linii i wklej między nimi Private Sub Workbook_Open() i End Sub jak pokazano na poniższym zrzucie ekranu.
skopiuj i wklej kod do modułu

4. Następnie kliknij Zapisz aby zapisać kod, w wyświetlanym oknie dialogowym przypomnienia kliknij Nie.
Kliknij przycisk Zapisz, aby zapisać kod

5 Następnie a Zapisz jako pojawi się okno dialogowe, zapisz plik jako Skoroszyt Excel z włączoną obsługą makr i wybierz folder, w którym chcesz umieścić plik.
zapisz plik jako Skoroszyt programu Excel z obsługą makr i wybierz folder, w którym chcesz go umieścić.

6. kliknij Zapisz przycisk. Teraz kod będzie działał, gdy skoroszyt jest otwarty.

Jeśli chcesz za każdym razem uruchamiać kod podczas zamykania skoroszytu, wybierz Dezaktywuj z prawej listy rozwijanej w Code okno i skopiuj kod, który uruchomisz i wklej pomiędzy Private Sub Workbook_Deactivate() i End Sub.

zrzut ekranu kutools dla Excel AI

Odblokuj magię Excela za pomocą Kutools AI

  • Inteligentne wykonanie: Wykonuj operacje na komórkach, analizuj dane i twórz wykresy — a wszystko to za pomocą prostych poleceń.
  • Formuły niestandardowe: Generuj dostosowane formuły, aby usprawnić przepływ pracy.
  • Kodowanie VBA: Pisz i wdrażaj kod VBA bez wysiłku.
  • Interpretacja formuły: Z łatwością zrozum złożone formuły.
  • Tłumaczenie tekstu: Przełam bariery językowe w arkuszach kalkulacyjnych.
Zwiększ możliwości programu Excel dzięki narzędziom opartym na sztucznej inteligencji. Pobierz teraz i doświadcz wydajności jak nigdy dotąd!

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
Używaj Kutools w swoim preferowanym języku – dostępny jest angielski, hiszpański, niemiecki, francuski, chiński i ponad 40 innych!

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...


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!