Excel VBA Userform variabel Input

Lese eller lage Excel-variabler med VBA userforms innebærer å skrive uttalelser som søker via Names tilhører den gjeldende arbeidsboken. Denne egenskapen er en samling VBA opprettholder av alle navnene som Excel-brukere definerer med programmets navn boksen til venstre på formellinjen. Tilføy-funksjonen av fortnavnene samlingen lar VBA programmerere lage nye navn.

Opprett Userform

Til at brukere kan legge inn innspill fra hvilken VBA-programmet kan lage Excel-variabler opprette et prosjekt med en Userform. Den Userform godtar et variabelnavn fra en bruker, og lar brukeren opprette en ny variabel med det navnet, eller leser verdien av en eksisterende variabel.

Start med å skape Userform. Åpne VBA programmering miljøet innenfra Excel ved å trykke "Alt" og "F11" samtidig. Klikk på "Userform" element av "Insert" -menyen for å lage Userform. Dra to TextBox kontrollene på skjemaet fra "Verktøykasse" panel. En tekstboks holder variabelnavnet, mens den andre holder variabelens verdi.

Dra to knapper på Userform. Den første lar brukeren opprette en ny variabel hvit den andre leser en eksisterende variabel. Dobbeltklikk den første knappen for å gå inn i programmeringsvinduet. Skrive VBA uttalelser i dette vinduet kan du opprette og lese variablene som brukeren skriver inn i Userform.

Tekstboks Verdi

For å bestemme navnet på den variabelen som brukeren ønsker å opprette eller lese, lese "Value" eiendom i tekstblokkobjekt. De VBA uttalelser etter denne paragraf laste variablene "VARNAME" og "varValue" med verdier fra "Value" tilhører to forskjellige tekstbokser.

VARNAME = textbox1.value
varValue = textbox2.value

Legg Method

For å opprette en ny variabel, i motsetning til å lese en eksisterende, bruker du verktøyet Legg metoden i gjeldende arbeidsbok s navn samling. Uttrykket "metode" betyr "funksjon". Du trenger bare å bruke to argumenter Legg metode for å lage et nytt navn. Følgende eksempelkode oppretter en ny Excel variabelnavn ved hjelp av Legg til.

ActiveWorkbook.Names.Add Navn: = VARNAME, RefersToR1C1: = varValue

Reading variabler

For å lese en eksisterende variabel fra en Userform, se etter variabel ved navn i Navn samlingen. Følgende VBA utsagn viser en meldingsboks som rapporterer verdien av navnet på variabelen VARNAME. VARNAME kan holde navnet brukeren har skrevet inn i tekstboksen for en Userform.

MsgBox ActiveWorkbook.Names (VARNAME)

Kjøre Program

Etter denne delen er en VBA program som skaper og leser Excel variabler ved hjelp av innspill fra en VBA Userform. Når du har limt dette programmet inn i en Userform modul, kjører du Userform ved å trykke "F5". Skriv inn et variabelnavn og verdi i skjemaets tekstboksene, og klikk deretter den første knappen du inn på skjemaet. VBA vil skape en ny variabel med verdien du har angitt. Klikk på skjemaets andre knappen for å vise verdien av variabelen du har angitt.

Private Sub CommandButton1_Click ()
Dim t
t = "=" & TextBox2.Value
ActiveWorkbook.Names.Add Navn: = TextBox1.Value, RefersToR1C1: = t
End Sub

Private Sub CommandButton2_Click ()
Dim t
t = TextBox2.Value
MsgBox ActiveWorkbook.Names (t)
End Sub