Koodige või programmeerige andmete valideerimisnimekiri - VBA koodinäited

Lang L: none (table-of-contents)

See õpetus näitab, kuidas andmete valideerimist kasutada Excelis ripploenditega töötamiseks, kasutades VBA-d.

Exceli andmete valideerimine võimaldab teil piirata lahtrisse või vahemikku sisestatud väärtust. Saate piirata kirjeid positiivsete täisarvude, teksti, kuupäevade ja palju muuga. Selles õpetuses vaatame, kuidas luua VBA abil lahtrisse andmete valideerimise ripploend.

Märkus. Andmete valideerimise ripploendi alternatiiv on ListBox-objekt. ListBoxi saab lisada Exceli töölehtedele. ListBoxes võivad käivitada makrod, mis käivituvad iga kord, kui ListBoxi väärtust muudetakse. ListBoxe kasutatakse ka VBA kasutajavormides.

Ripploendi loomine VBA abil

Lahtris A1 on tekst Puu ja loome lahtrisse A2 ripploendi, kus on viis kirjet.

Kasutame meetodit Validation.Add ja määrame parameetri Tüüp xlValidateList. Saate lisada oma loendisse soovitud üksused, kasutades parameetrit Vormel1.

Järgmine kood loob lahtrisse A2 andmete valideerimise ripploendi:

123456 Sub DropDownListinVBA ()Vahemik ("A2"). Validation.Add Type: = xlValidateList, AlertStyle: = xlValidAlertStop, _Valem1: = "Apelsin, õun, mango, pirn, virsik"End Sub

Tulemuseks on:

Täitke rippmenüü nimekirjas VBA -s

VBA ripploendi täitmiseks saate kasutada üksusi sisaldavat nimega vahemikku. Meil on allpool näidatud loomade vahemik:

Peame seadistama parameetri Vormel 1 võrdseks nimetatud vahemikuga. Järgmine kood loob lahtrisse A7 andmete valideerimise ripploendi, mis põhineb nimetatud vahemiku üksustel:

123456 Sub populateFromANamedRange ()Vahemik ("A7"). Validation.Add Type: = xlValidateList, AlertStyle: = xlValidAlertStop, _Valem1: = "= Loomad"End Sub

Tulemuseks on:

Ripploendi eemaldamine

Rippmenüü eemaldamiseks lahtrist saate kasutada meetodit Validation.Delete. Järgmine kood eemaldaks ülaltoodud näite lahtrist A7 ripploendi:

12345 Sub RemoveDropDownList ()Vahemik ("A7"). Valideerimine. KustutaEnd Sub
wave wave wave wave wave