/ / Excel VBA události

Události aplikace Excel VBA

Otevřít událost sešit | Změna události pracovního listu

Události jsou akce prováděné uživateli, které spouštějí Excel VBA k provedení kódu.

Otevřít událost sešit

Kód přidaný do události Open Workbook bude spuštěn v aplikaci Excel VBA při otevření sešitu.

1. Otevřete editor jazyka.

2. Poklepejte na Tento sešit v aplikaci Průzkumník projektu.

3. V levé rozevírací nabídce vyberte sešit. V pravém rozevíracím seznamu vyberte možnost Otevřít.

Otevřete událost sešit v aplikaci Excel VBA

4. Do události Open Workbook přidejte následující kódový řádek:

MsgBox "Good Morning"

5. Uložte, zavřete a znovu otevřete soubor aplikace Excel.

Výsledek:

Sešit Otevřete výsledek události

Změna události pracovního listu

Kód přidaný do události Změna pracovního listu bude proveden pomocí aplikace Excel VBA při změně buňky v listu.

1. Otevřete editor jazyka.

2. Poklepejte na list (například List1) v Průzkumníku projektu.

3. V levé rozevírací nabídce vyberte pracovní list. V pravém rozevíracím seznamu vyberte možnost Změnit.

Změna události pracovního listu v aplikaci Excel VBA

Přidejte následující řádky kódu do události Změna pracovního listu:

4. Změna události pracovního listu naslouchá všem změnám v listu1. Chceme, aby aplikace Excel VBA něco udělala, kdyby se něco v buňce B2 změnilo. Chcete-li to dosáhnout, přidejte následující řádky kódu:

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

End If

5. Chceme, aby aplikace Excel VBA zobrazila MsgBox, pokud uživatel zadá hodnotu vyšší než 80. Chcete-li to dosáhnout, přidejte následující kódový řádek mezi If a End If.

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

6. Na listu1 zadejte číslo větší než 80 do buňky B2.

Zadejte číslo větší než 80

Výsledek:

Výsledek události změny sešitu

Také si přečtěte: