Läsa eller skapa Excel- variabler med VBA standardmallar innebär att skriva uttalanden som Query namnen tillhör den aktuella arbetsboken . Denna fastighet är en samling VBA underhåller på alla namn som Excel-användare definierar med programmets namn rutan till vänster om formelfältet . Funktionen add av namnen samlingen låter VBA programmerare skapa nya namn . Skapa UserForm
att möjliggöra för användare att ange indata som din VBA -program kan skapa Excel variabler skapar ett projekt med en userform . Den UserForm accepterar en variabel från en användare , och låter användaren skapa en ny variabel med det namnet , eller läser värdet på en befintlig variabel .
Börja med att skapa den userform . Öppna VBA programmeringsmiljö inifrån Excel genom att trycka på " Alt " och " F11 " samtidigt . Klicka på " UserForm " post i " Infoga " -menyn för att skapa userform . Dra två textbox kontroller på formuläret från " Verktygslåda " panel . En textruta håller variabelnamnet medan den andra håller variabelns värde .
Drag två knappar på userform . Den första låter användaren skapa en ny variabel vit den andra läser en befintlig variabel . Dubbelklicka på den första knappen för att öppna programmeringsläget fönstret . Typing VBA uttalanden i det här fönstret kan du skapa och läsa de variabler som användaren skriver in i userform .
Textruta Value
att bestämma namnet på den variabel som användaren vill skapa eller läsa , läsa " Value " egendom av textrutor . VBA uttalanden efter detta avsnitt ladda variablerna " varName " och " varValue " med värden från " Value " egendom av två olika textrutor .
VarName = textbox1.valuevarValue = textbox2.value
Addera Lägg metod
vill skapa en ny variabel , till skillnad från att läsa en befintlig , använd metoden Add för den aktuella arbetsboken namnger samling . Termen " metod " betyder " funktion . " Du behöver bara använda två argument metoden Add för att skapa ett nytt namn . Följande exempelkod skapar ett nytt Excel variabelnamn använder Lägg
ActiveWorkbook.Names.Add Namn : . = VarName , RefersToR1C1 : = varValue
Läsa variabler
att läsa en befintlig variabel från en UserForm , leta efter variabeln med namnet i namn samlingen . Följande VBA uttalanden visar ett meddelande som rapporterar värdet av namnet på variabeln varName . varName kan hålla namnet en användare har skrivit i textrutan för en userform .
MsgBox ActiveWorkbook.Names ( varName )
Köra programmet
efter detta avsnitt är ett VBA -program som skapar och läser Excel variabler med input från en VBA UserForm . När du har klistrat detta program i en UserForm modul , kör UserForm genom att trycka på " F5 ". Skriv ett variabelnamn och värde i formulärets textrutor , klicka på den första knappen du in i formuläret . VBA skapar en ny variabel med värdet du angett . Klicka formulärets andra knappen för att visa värdet på den variabel som du specificerade
Private Sub CommandButton1_Click ( ) Dim tt = " = " & TextBox2.ValueActiveWorkbook.Names.Add Namn : . = TextBox1.Value , RefersToR1C1 : = tenderar Sub
Private Sub CommandButton2_Click ( ) Dim tt = TextBox2.ValueMsgBox ActiveWorkbook.Names ( t ) End Sub
