Šiame straipsnyje bus parodyta, kaip naudoti teksto lauką „Excel VBA“.
VBA turi galimybę kurti formas, su kuriomis vartotojas gali sąveikauti, pavyzdžiui, sąskaitų faktūrų formas arba kontaktinę informaciją. Teksto laukeliai yra valdikliai, kuriuos galima naudoti šiose formose, arba teksto laukeliai gali būti sukurti tiesiogiai pačioje „Excel“.
Teksto laukelių kūrimas VBA formose
Norėdami įterpti teksto laukelį į VBA formą, pirmiausia turime sukurti formą. Tai daroma VBE redaktoriuje.
Pirmiausia atidarykite „VBE“ redaktorių „Excel“.
Norėdami į savo kodą įterpti naują vartotojo formą, pasirinkite UserForm parinktį iš Įterpti meniu.
Ekrane pasirodys nauja vartotojo forma Projektų tyrinėtojas ir bus rodomas dešinėje esančiame kodo lange.
Galite pervadinti savo formą naudodami Savybės dėžė. Tai turėtų pasirodyti po jūsų Projektų tyrinėtojas.
Jei matote, paspauskite F4 arba spustelėkite Peržiūrėti, Ypatybių langas.
Spustelėkite vardas nuosavybę ir pervardykite savo formą.
Dabar galime pradėti pildyti savo formą valdikliais - teksto laukelio valdiklis yra populiariausias valdiklis kartu su etikečių valdikliu.
Norėdami užpildyti formą valdikliais, turime įjungti įrankių dėžę.
Viduje konors Meniu, pasirinkite Rodinys> Įrankių dėžė.
Norėdami savo formoje sukurti teksto laukelį, įrankių juostoje pasirinkite teksto laukelio valdiklį.
Vilkite formos langelį formoje pele, laikydami nuspaudę kairįjį mygtuką, tada atleiskite pelės mygtuką.
Kadangi tai yra pirmasis mūsų sukurtas teksto laukelis, jis bus pavadintas „TextBox1“. Kaip ir formą, galite naudoti langą Ypatybės, norėdami pervardyti teksto lauką.
Taip pat gali tekti sukurti etiketę formos teksto laukeliui. Tai daroma naudojant etiketės valdiklį. Vilkiate formą taip pat, kaip ir teksto laukelį, tada etikečių valdiklyje galite įvesti reikiamą tekstą, pvz .: Vardas, kaip parodyta žemiau.
Norėdami naudoti formą VBA kode, turime prie formos pridėti komandos mygtuką. Tai daroma įrankių juostoje pasirinkus „Command Button“ valdiklį ir tempiant mygtuką ant formos.
Tada galite toliau kurti formą naudodami teksto laukelius, etiketes ir komandų mygtukus, juos atitinkamai pervardydami.
Kodų rašymas už formų
Sukūrę formą, turime parašyti VBA kodą, kad informaciją į mūsų formą įterptume į „Excel“ darbalapį. Šis kodas vadinamas CBF (Kodas už formų).
VBE dukart spustelėkite komandos mygtuką, kad pereitumėte prie kodo, esančio už mygtuko.
Bus sukurtas mygtuko paspaudimo įvykio papildomas veiksmas. Šioje procedūroje galime įvesti savo VBA kodą. Pavyzdžiui:
| 123456 | Privatus antrinis cmdOK_Click ()Diapazonas („A1“) = Me.txtFirstNameDiapazonas ("A2") = Me.txtPavardėDiapazonas ("A3") = Me.txtCellPhoneIškrauti manePabaiga Sub |
Ši tvarka į teksto laukelius įvestą informaciją įdės į „Excel“, o tada uždarys formą.
Teksto laukelių kūrimas „Excel“ darbalapyje
„Excel“ skaičiuoklėje taip pat galima sukurti teksto laukelių. Norėdami tai padaryti, turite įjungti kūrėjo juostelę.
Pastaba: jei nematote kūrėjo juostelės, turėsite ją įgalinti.
Juostelėje pasirinkite Kūrėjas> Įterpti> „ActiveX“ valdikliai> „TextBox“.
Spustelėkite ir vilkite „Excel“ darbalapyje, norėdami nubrėžti teksto laukelį darbalapyje norimoje vietoje. Atleiskite pelės mygtuką, kad baigtumėte piešti teksto laukelį.
Teksto laukelis bus dizaino režime. Šiuo režimu galime padidinti langelio dydį ir pasirinkti teksto lauko ypatybes.
Spustelėkite Savybės mygtuką, kad būtų rodomas teksto laukelio ypatybių langas. Šiame lange galime pakeisti įvairias teksto laukelio savybes, pvz., Langelio pavadinimą, teksto spalvą, foną ar kraštinę, apvado stilių ir šriftą, naudojamą, pavyzdžiui, teksto laukelyje esančiam tekstui.
Norėdami naudoti teksto laukelį tiesiogiai „Excel“, kaip mes jį naudojome aukščiau esančioje VBA formoje, mums reikia būdo grąžinti į teksto laukelį įvestus duomenis į „Excel“ lapą. Tai galima padaryti pridėjus „ActiveX“ komandos mygtuką prie darbalapio ir naudojant šios komandos mygtuko „click_event“, kad teksto laukelyje esanti informacija būtų grąžinta į „Excel“ lapą.
Juostelėje pasirinkite Kūrėjas> Įterpti> „ActiveX“ valdikliai> Komandos mygtukas norėdami pridėti komandų mygtuką prie „Excel“ lapo. Įjunkite ypatybių langą ir pakeiskite mygtuko pavadinimą, mygtuko antraštę ir mygtuko greitintuvą, kaip parodyta paveikslėlyje žemiau.
Dukart spustelėkite mygtuką, kad pereitumėte į mygtuko VBA paspaudimo įvykį ir įveskite šį kodą:
| 123 | Privatus antrinis cmdOK_Click ()Diapazonas („A1“) = Me.txtFirstNamePabaiga Sub |
Grįžkite į „Excel“ darbalapį, įsitikinkite, kad dizaino režimas išjungtas, tada įveskite sukurtą teksto laukelį.
Spustelėkite komandos mygtuką, kad grąžintumėte tekstą į „Excel“.
