Microsoft Visual Basic for Applications ( VBA ) tillåter programmerare att använda olika kontrollobjekt på användarformulär . Objektet kan motsvara lådan , bild , rullningslist eller kontroller knappen . En växlingsknapp i ett formulär är en kontroll som används för att visa en " Ja /Nej " värde från en datakälla . Mjukvaruutvecklare använda växlingsknapparna i en alternativ grupp med andra knappar och dialogrutor för att acceptera indata . När du klickar på en växlingsknapp objekt , verkar det att pressas eller tryckas ned . Du måste erhålla värdet av en växlingsknapp kontroll för aktivera växlingsknappen i VBA . Instruktioner
1
Klicka på "Start " -knappen i Windows och välj " Microsoft Excel " från " Alla program " -menyn för att öppna en ny arbetsbok .
2
Klicka "Verktyg ", " Macro " och " Visual Basic Editor " .
3
Klicka " infoga " och sedan " UserForm " för att infoga ett användarnamn form i arbetsboken .
4
Lägg till " ToggleButton " och " Label " kontroller användaren formuläret .
5
Dubbelklicka på " ToggleButton " för att öppna " Code "-fönstret för ToggleButton kontroll .
6
Skriv följande kod för " ToggleButton1Click händelsen :
Private Sub ToggleButton1_Click ( ) katalog p Om ToggleButton1.Value = sant då
"Set UserForm bakgrunden till Red .
Me.BackColor = RGB ( 255 , 0 , 0 ) katalog
Else
" Set UserForm bakgrunden till blått .
Me.BackColor = RGB ( 0 , 0 , 255 ) katalog
End If
End Sub
7
Klicka på "Kör Sub /UserForm " på " Kör " -menyn för att aktivera hävarmsknappen i din VBA kontroll .