/ / Excel VBA Events

Excel VBA Events

Otwarty Workbook | Arkusz Zmień wydarzenie

Wydarzenia są czynnościami wykonywanymi przez użytkowników, które wyzwalają Excel VBA wykonać kod.

Otwarty Workbook

Kod dodany do Workbook Open Event zostanie wykonany przez Excel VBA po otwarciu skoroszytu.

1. Otwórz Edytor Visual Basic.

2. Kliknij dwukrotnie na ten skoroszyt w eksploratorze projektu.

3. Wybierz Skoroszyt z lewej listy rozwijanej. Wybierz Otwórz z prawej rozwijanej listy.

Workbook Open Event w programie Excel VBA

4. Dodaj następujący wiersz kodu do zdarzenia Workbook Open:

MsgBox "Good Morning"

5. Zapisz, zamknij i ponownie otwórz plik Excel.

Wynik:

Wynik zbioru otwartego skoroszytu

Arkusz Zmień wydarzenie

Kod dodany do zdarzenia zmiany arkusza roboczego zostanie wykonany przez Excel VBA po zmianie komórki w arkuszu.

1. Otwórz Edytor Visual Basic.

2. Kliknij dwukrotnie arkusz (na przykład Arkusz1) w Eksploratorze projektu.

3. Wybierz Arkusz roboczy z lewej listy rozwijanej. Wybierz Zmień z prawej listy rozwijanej.

Arkusz Zmień wydarzenie w programie Excel VBA

Dodaj następujące wiersze kodu do zdarzenia zmiany arkusza roboczego:

4. Wydarzenie Zmiana arkusza roboczego nasłuchuje wszystkich zmian w Arkusz1. Chcemy, aby Excel VBA coś zrobił, jeśli coś zmieni się w komórce B2. Aby to osiągnąć, dodaj następujące linie kodu:

If Target.Address = "$B$2" Then

End If

5. Chcemy, aby Excel VBA wyświetlał MsgBox, jeśli użytkownik wprowadzi wartość większą niż 80. Aby to osiągnąć, dodaj następującą linię kodu między If i End If.

If Target.Value > 80 Then MsgBox "Goal Completed"

6. Na Arkusz1 wprowadź liczbę większą niż 80 w komórce B2.

Wpisz liczbę większą niż 80

Wynik:

Skoroszyt Zmień wynik wydarzenia

Przeczytaj również: