I den här artikeln kommer vi att lära oss hur du lägger till ett inmatningsmeddelande i datavalidering medan du anger de specifika posterna i cellen med VBA i Microsoft Excel.
Datavalidering är verktyget som används för att begränsa inmatningen i ett intervall eller data så att vi kan definiera vilken typ av data som ska anges i arket.
Låt oss ta ett exempel och förstå:-
Vi har ländernas namn i D -kolumnen och i cell A1 vill vi skapa ett rullgardinsfilter för ländernas namn.
Vi vill markera cellen A1 och göra rullgardinsmenyn till ländernas namn och lägga meddelandet för att låta användarna veta vilka poster som måste anges i intervallet.
Följ nedanstående steg och kod:-
- Öppna VBE -sidan för att trycka på tangenten Alt+F11.
- Sätt i modulen för att skriva koden.
- Skriv koden nedan:-
Sub DropDownFilter () Dim lastrow As Long lastrow = Arbetsblad ("blad1"). Celler (rader.räkning, "D"). Slut (xlUp) .Rad med intervall ("A1: A10"). Validering. Lägg till typ: = xlValidateList, AlertStyle: = xlValidAlertStop, Operator: = xlBetween, Formula1: = "= $ D $ 2: $ D" & lastrow .IgnoreBlank = True .InCellDropdown = True .InputTitle = "Message" .InputMessage = "Ange endast ländernas namn" Range ("A1: A10"). Interiör.ColorIndex = 37 Slut med slut Sub
Kod Förklaring:-
Först hade vi definierat alla variabler, sedan hade vi skapat intervallet som skulle hjälpa till att skapa det dynamiska rullgardinsfiltret. På samma sätt hade vi definierat inmatningstiteln och inmatningsmeddelandet. Och då hade vi definierat destinationen där vi vill skapa rullgardinsmenyn och sedan skulle vi fylla cellen med färg.
För att köra koden, tryck på tangenten F5 på tangentbordet
- En rullgardinsmeny skapas för länderna.
- Och också kommer cellen att fyllas med färg.
- Och även när vi anger det nya landnamnet i intervallet, väljer rullgardinsmenyn landets namn automatiskt.
- Meddelande visas i den valda cellen i intervallet A1: A10.
På detta sätt kan vi lägga till ett inmatningsmeddelande i datavalidering via VBA i Microsoft Excel.
Om du gillade våra bloggar, dela den med dina vänner på Facebook. Och du kan också följa oss på Twitter och Facebook.
Vi vill gärna höra från dig, låt oss veta hur vi kan förbättra, komplettera eller förnya vårt arbete och göra det bättre för dig. Skriv till oss på e -postwebbplatsen