Teksto laukelis yra tuščias laukas, kuriame vartotojas gali užpildyti teksto dalį. Norėdami sukurti a teksto laukelį į Excel VBA, atlikite šiuos veiksmus.
1. Skirtuke Kūrėjas spustelėkite Įterpti.
2. Grupėje „ActiveX“ valdikliai spustelėkite Teksto laukelis.
3. Vilkite komandų mygtuką ir teksto laukelį darbalapyje.
4. Dešiniuoju pelės mygtuku spustelėkite komandos mygtuką (įsitikinkite, kad pasirinktas dizaino režimas).
5. Spustelėkite Peržiūrėti kodą.
Pastaba: valdiklio antraštę ir pavadinimą galite pakeisti dešiniuoju pelės klavišu spustelėdami valdiklį (įsitikinkite, kad pasirinktas projektavimo režimas), tada spustelėdami Ypatybės. Pakeiskite komandos mygtuko antraštę į Importuoti duomenis. Kol kas paliksime „TextBox1“ kaip teksto laukelio pavadinimą.
6. Pridėkite šią kodo eilutę:
TextBox1.Text = "Duomenys sėkmingai importuoti"
7. Spustelėkite komandų mygtuką lape (įsitikinkite, kad dizaino režimas nepažymėtas).
Rezultatas:
8. Norėdami išvalyti teksto laukelį, naudokite šią kodo eilutę:
TextBox1.Value = ""
Pastaba: nors kai kuriose situacijose gali būti naudinga tiesiogiai įdėti teksto laukelį į savo darbalapį, teksto laukelis yra ypač naudingas, kai jis dedamas į „Userform“.
