Læsning eller oprette Excel variabler med VBA UserForms indebærer skrive udsagn pågældende forespørgsel Navne ejendom aktuelle projektmappe . Denne egenskab er en samling VBA fastholder alle de navne, der Excel-brugere definerer med programmets navn boksen til venstre for formellinjen. Den Add funktion Names kollektionen lader VBA programmører at skabe nye navne . Opret UserForm
For at gøre det muligt for brugerne at indtaste input , hvorfra din VBA program kan oprette Excel variabler oprette et projekt med en UserForm . Den UserForm accepterer en variabel navn fra en bruger , og lader brugeren oprette en ny variabel med det navn , eller læser værdien af en eksisterende variabel .
Start ved at skabe de UserForm . Åbn VBA programmering miljø indefra Excel ved at trykke på " Alt" og " F11 " samtidigt. Klik på " UserForm " element i " Indsæt" menuen for at oprette UserForm . Træk to tekstboks kontrolelementer til formularen fra " Værktøjskasse " panel . Én tekstboks holder variabelnavnet , mens den anden holder den variable værdi.
Drag to knapper på den UserForm . Den første lader brugeren oprette en ny variabel hvid den anden læser en eksisterende variabel . Dobbeltklik på den første knap for at komme ind i programmerings -vinduet. Typing VBA udsagn i dette vindue kan du oprette og læse de variabler, brugeren skriver i UserForm .
Tekstboks Value
For at finde navnet på den variabel, brugeren ønsker at oprette eller læse, læse " Value" ejendom tekstboks objekt. VBA udsagn følger denne sektion indlæse variablerne " VARNAVN " og " varValue " med værdier fra "Value " ejendom af to forskellige tekstfelter.
VARNAVN = textbox1.valuevarValue = textbox2.value < br >
Tilføj Method
For at oprette en ny variabel , i modsætning til at læse en eksisterende , skal du bruge metoden Add den aktuelle projektmappe navne samling. Udtrykket "metode" betyder " funktion". Du behøver kun at bruge to argumenter Add metode til at skabe et nyt navn. Følgende kodeeksempel opretter et nyt Excel variabelnavn hjælp af Tilføj
ActiveWorkbook.Names.Add navn: . = Varname , RefersToR1C1 : = varValue
fotos Reading variable
at læse en eksisterende variabel fra en UserForm , kigge efter den variabel ved dens navn i navne samling. Følgende VBA udsagn vise en besked boks , der rapporterer værdien af navnet i variablen VARNAVN . VARNAVN kan holde navnet en bruger har indtastet i tekstfeltet for en UserForm .
MsgBox ActiveWorkbook.Names ( varname )
køre programmet
efter denne sektion er en VBA program, der skaber og læser Excel variabler ved hjælp af input fra en VBA UserForm . Når du har indsat dette program i en UserForm modul UserForm køre ved at trykke " F5 ". Skriv et variabelnavn og værdi i formularens tekstbokse , og klik derefter på den første knap , du har indsat i formularen. VBA vil oprette en ny variabel med den værdi, du har angivet. Klik på formularen anden knap for at vise værdien af variablen , du har angivet
Private Sub CommandButton1_Click ( ) Dim tt = " = " & TextBox2.ValueActiveWorkbook.Names.Add navn: . = TextBox1.Value , RefersToR1C1 : = tendens Sub
Private Sub CommandButton2_Click ( ) Dim tt = TextBox2.ValueMsgBox ActiveWorkbook.Names (t ) End Sub