Slik aktiverer du en veksleknapp i VBA

Microsoft Visual Basic for Applications (VBA) lar programmerere å bruke forskjellige kontrollobjekter på brukerskjemaer. Objektet kan tilsvare merket, bilde, blar bar eller knappekontrollene. En alternativknapp på et skjema er en kontroll som brukes til å vise en "Ja / Nei" verdi fra en datakilde. Programvareutviklere bruker avlange knappene i en alternativ gruppe med andre knapper og dialogbokser for å godta brukerundersøkelser. Når du klikker på en vippeknapp objekt, ser det ut til å bli presset eller presset ned. Du trenger å få verdien av en vippeknapp kontroll for å aktivere veksle knappen i VBA.

Bruksanvisning

1 Klikk på "Start" -knappen i Windows og velg "Microsoft Excel" fra "Alle programmer" -menyen for å åpne en ny arbeidsbok.

2 Klikk på "Verktøy" og "makro" og "Visual Basic Editor".

3 Klikk "Sett inn" og deretter "Userform" for å sette inn en bruker skjema i arbeidsboken.

4 Tilsett "ToggleButton" og "label" kontroller på brukerens form.

5 Dobbeltklikk på "ToggleButton" kontrollen for å åpne "Code" vinduet for ToggleButton kontroll.

6 Skriv inn følgende kode for "ToggleButton1Click hendelsen:

Private Sub ToggleButton1_Click()

Hvis ToggleButton1.Value = True Deretter

'Sett Userform bakgrunnen til Red.

Me.BackColor = RGB (255, 0, 0)

Ellers

'Sett Userform bakgrunnen til blå.

Me.BackColor = RGB (0, 0, 255)

Slutt om

End Sub

7 Klikk på "Run Sub / Userform" i "Kjør" menyen for å aktivere veksle knappen i VBA kontroll.