VBA eller Visual Basic for Applications , er en kraftig makro programmeringsspråk som følger med regnearkprogrammet Microsoft Excel. Du kan sjekke hvert kontroll over en gruppe av kontroller i et program , eller makro , skriver du spare deg fra å måtte angi en bestemt kontroll til å lese sine eiendommer . Excel gjør kontroll gruppering mulig gjennom sin " Frame" kontroll. Den " Controls " eiendom av denne kontrollen gir tilgang til kontrollene inne i rammen . Dessuten bruker den " Controls " eiendom for å lese verdier av en " Frames " kontroll , kan du sette kontroll verdier også . For eksempel kan du skjule eller vise kontroller i en ramme med " Synlig " eiendom . Instruksjoner
en
Klikk på " Utvikler " fanen " Visual Basic" -knappen for å gå inn i VBA programmering miljø, så klikker du på " Sett inn" -menyen er " UserForm " element for å skape en ny form som du kan plassere kontroller . Hvis "Utvikler " fanen ikke vises blant dine menyvalg i Excel , må du kanskje slå på skjermen sin i Excel av alternativer .
2
Klikk på " Button" kontroll på verktøyet boksen , og deretter dra på UserForm å lage en knapp . Klikk på " OptionButton " kontroll fra verktøyet boksen , og deretter dra på UserForm å skape et alternativ knappen . Høyreklikk på denne knappen og klikk "Properties " for å vise en liste over egenskaper for kontrollen.
3
Klikk på "Enabled " raden i "Properties " vinduet , og skriv " False "for å indikere at alternativet knappen ikke er i stand til å behandle innspill . Merk at kommandoen knappen, som du opprettet i trinn 2 , er aktivert som standard .
4
Klikk på " Frame" kontroll på verktøyet boksen , og deretter dra på UserForm . Klikk på knappen kontrollen du gjorde i trinn 1 , og trykk deretter på "Control " og " X " samtidig for å kutte denne kontrollen til utklippstavlen .
5
Klikk på " Frame" -kontroll , og trykk deretter på "Control " og " V" samtidig for å lime inn knappen inne i rammen. Gjenta klipp og lim med mulighet for å lime det inn i rammen også. Ved å plassere begge kontrollene i rammen , har du gjort en gruppe som inneholder begge kontrollene . Du vil nå skrive kode som sjekker en eiendom på hver kontroll.
6
Dobbeltklikk på UserForm å vise programmeringsvinduet , deretter limer du inn følgende program i vinduet. Dette programmet gjentas gjennom hver kontroll i rammen , lest " Enabled " eiendom innstilt i trinn 3 , og skriver ut verdien av denne eiendommen .
Private Sub UserForm_Click ( )
Dim ct As kontroll
Dim s As String
Hver ct I Frame1.Controls
p Hvis ct.Enabled = True Deretter
s = ct.Name & " er aktivert . "
Else
s = ct.Name &" er deaktivert. "
End If
MsgBox s
Neste
End Sub
7
Klikk på " Kjør" -menyen er " Kjør"-kommandoen for å vise UserForm , deretter klikke hvor som helst på skjemaet som ikke har en kontroll . Programmet vil kjøre , viser meldingen om "Enabled " eiendom beskrevet i trinn tre .