W tym artykule dowiemy się, jak dodać komunikat wejściowy w walidacji danych podczas wprowadzania określonych wpisów w komórce, używając VBA w programie Microsoft Excel.
Walidacja danych to narzędzie, które służy do ograniczania wpisu w zakresie lub danych, dzięki czemu możemy określić, jaki rodzaj danych należy wprowadzić w arkuszu.
Weźmy przykład i zrozum:-
Mamy nazwę krajów w kolumnie D, aw komórce A1 chcemy utworzyć rozwijany filtr dla nazw krajów.
Chcemy podświetlić komórkę A1 i zrobić listę rozwijaną do nazwy krajów i umieścić wiadomość, aby użytkownicy wiedzieli, które wpisy należy wprowadzić w zakresie.
Postępuj zgodnie z poniższymi instrukcjami i kodem:-
- Otwórz stronę VBE, aby nacisnąć klawisz Alt + F11.
- Włóż moduł, aby napisać kod.
- Napisz poniższy kod:-
Sub DropDownFilter() Dim lastrow As Long lastrow = Worksheets("sheet1").Cells(Rows.Count, "D").End(xlUp).Row With Range("A1:A10").Validation .Add Type:= xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:="=$D$2:$D" & lastrow .IgnoreBlank = True .InCellDropdown = True .InputTitle = "Wiadomość" .InputMessage = "Wprowadź tylko nazwę krajów" ("A1:A10").Interior.ColorIndex = 37 Koniec z końcem Sub
Wyjaśnienie kodu:-
Najpierw zdefiniowaliśmy wszystkie zmienne, a następnie stworzyliśmy zakres, który pomógłby stworzyć dynamiczny filtr rozwijany. Podobnie zdefiniowaliśmy tytuł wejściowy i komunikat wejściowy. Następnie zdefiniowaliśmy miejsce docelowe, w którym chcemy utworzyć listę rozwijaną, a następnie wypełnimy komórkę kolorem.
Aby uruchomić kod, naciśnij klawisz F5 na klawiaturze
- Dla krajów zostanie utworzona lista rozwijana.
- A także komórka zostanie wypełniona kolorem.
- A także, gdy wprowadzimy nową nazwę kraju w zakresie, rozwijana lista automatycznie wybierze nazwę kraju.
- Wiadomość pojawi się w wybranej komórce w zakresie A1:A10.
W ten sposób możemy dodać komunikat wejściowy w walidacji danych poprzez VBA w Microsoft Excel.
Jeśli podobały Ci się nasze blogi, podziel się nimi ze znajomymi na Facebooku. A także możesz śledzić nas na Twitterze i Facebooku.
Chcielibyśmy usłyszeć od Ciebie, daj nam znać, jak możemy ulepszyć, uzupełnić lub unowocześnić naszą pracę i uczynić ją lepszą dla Ciebie. Napisz do nas na stronie e-mail