U ovom ćemo članku naučiti kako dodati ulaznu poruku u provjeru valjanosti podataka dok unosite određene unose u ćeliju, koristeći VBA u programu Microsoft Excel.
Validacija podataka je alat koji se koristi za ograničavanje unosa u rasponu ili podataka tako da možemo definirati koju vrstu podataka treba unijeti u list.
Uzmimo primjer i shvatimo:-
Ime zemlje imamo u stupcu D, a u ćeliji A1 želimo stvoriti padajući filtar za naziv zemalja.
Želimo označiti ćeliju A1 i napraviti padajući popis prema nazivu zemalja te staviti poruku kako bi korisnici znali koje unose je potrebno unijeti u raspon.
Slijedite dolje navedene korake i kôd:-
- Otvorite stranicu VBE da pritisnete tipke Alt+F11.
- Umetnite modul za pisanje koda.
- Napišite dolje navedeni kod:-
Sub DropDownFilter () Zatamni posljednji dio Kao dugački zadnji = Radni listovi ("list1"). Ćelije (Brojevi redaka, "D"). Kraj (xlUp). Red s rasponom ("A1: A10"). Provjera. Vrsta dodavanja: = xlValidateList, AlertStyle: = xlValidAlertStop, Operator: = xlBetween, Formula1: = "= $ D $ 2: $ D" & lastrow .IgnoreBlank = True .InCellDropdown = True .InputTitle = "Poruka". Samo naziv polja ("A1: A10"). Interijer.Indeks boje = 37 Završi s završnom podlogom
Šifra Objašnjenje:-
Prvo smo definirali sve varijable, zatim smo stvorili raspon koji će pomoći u stvaranju dinamičkog padajućeg filtra. Slično, definirali smo ulazni naslov i ulaznu poruku. Zatim smo definirali odredište na kojem želimo stvoriti padajući popis, a zatim bismo ćeliju ispunili bojom.
Za pokretanje koda pritisnite tipku F5 na tipkovnici
- Za zemlje će se stvoriti padajući popis.
- Također, ćelija će biti ispunjena bojom.
- Također, kad god unesemo naziv nove zemlje u raspon, padajući popis automatski će odabrati naziv zemlje.
- Poruka će se pojaviti u odabranoj ćeliji u rasponu A1: A10.
Na taj način možemo dodati ulaznu poruku za provjeru valjanosti podataka putem VBA u Microsoft Excelu.
Ako vam se sviđaju naši blogovi, podijelite ih sa svojim prijateljima na Facebooku. Također nas možete pratiti na Twitteru i Facebooku.
Voljeli bismo čuti vaše mišljenje, javite nam kako možemo poboljšati, nadopuniti ili inovirati svoj rad i učiniti ga boljim za vas. Pišite nam na web stranici e -pošte