/ / Excel VBA Events

Excel VBA Events

Arbetsbok Open Event | Arbetsblad Ändra händelse

evenemang är åtgärder som utförs av användare som utlöser Excel VBA att utföra kod.

Arbetsbok Open Event

Kod som läggs till i Arbetsbokens öppna händelse kommer att utföras av Excel VBA när du öppnar arbetsboken.

1. Öppna Visual Basic Editor.

2. Dubbelklicka på Den här arbetsboken i Project Explorer.

3. Välj Arbetsbok från den vänstra rullgardinsmenyn. Välj Öppna i den nedrullningsbara listan.

Arbetsbok Open Event i Excel VBA

4. Lägg till följande kodrad i arbetsbokens öppna händelse:

MsgBox "Good Morning"

5. Spara, stäng och öppna Excel-filen igen.

Resultat:

Arbetsbok Öppna Eventresultat

Arbetsblad Ändra händelse

Kod som läggs till i arbetsbladets ändringshändelse kommer att köras av Excel VBA när du byter en cell i ett kalkylblad.

1. Öppna Visual Basic Editor.

2. Dubbelklicka på ett ark (till exempel Sheet1) i Project Explorer.

3. Välj Arbetsblad från den vänstra rullgardinsmenyn. Välj Ändra från den högra rullgardinsmenyn.

Arbetsblad Ändra händelse i Excel VBA

Lägg till följande kodlinjer till arbetsbladets ändringshändelse:

4. Verktyget Ändra händelse lyssnar på alla ändringar på Sheet1. Vi vill bara att Excel VBA ska göra något om något ändras i cell B2. För att uppnå detta lägger du till följande kodlinjer:

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

End If

5. Vi vill bara att Excel VBA ska visa en MsgBox om användaren anger ett värde större än 80. För att uppnå detta lägger du till följande kodlinje mellan If och End If.

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

6. På Sheet1, ange ett nummer större än 80 i cell B2.

Ange ett nummer som är större än 80

Resultat:

Arbetsbok Ändra händelse resultat

Läs också: