У овом чланку ћемо научити како додати улазну поруку у валидацију података док уносите одређене уносе у ћелију, користећи ВБА у Мицрософт Екцелу.
Валидација података је алат који се користи за ограничавање уноса у распону или података тако да можемо дефинирати коју врсту података треба унијети у табелу.
Узмимо пример и разумејмо:-
Име земље имамо у колони Д, а у ћелији А1 желимо да направимо падајући филтер за назив земаља.
Желимо да истакнемо ћелију А1 и направимо падајућу листу према називу земаља и ставимо поруку како би корисници знали које уносе је потребно унети у опсег.
Следите доле наведене кораке и код:-
- Отворите страницу ВБЕ да притиснете тастер Алт+Ф11.
- Уметните модул за писање кода.
- Напишите доле наведени код:-
Суб ДропДовнФилтер () Дим ластров Ас Лонг ластров = Радни листови ("схеет1"). Ћелије (Ровс.Цоунт, "Д"). Енд (клУп) .Ров Витх Ранге ("А1: А10"). Валидатион .Адд Типе: = клВалидатеЛист, АлертСтиле: = клВалидАлертСтоп, Оператор: = клБетвеен, Формула1: = "= $ Д $ 2: $ Д" & ластров .ИгнореБланк = Труе .ИнЦеллДропдовн = Труе .ИнпутТитле = "Порука". ("А1: А10"). Интериор.ЦолорИндек = 37 Енд Витх Енд Суб
Шифра Објашњење:-
Прво смо дефинисали све променљиве, затим смо креирали опсег који би помогао у креирању динамичког падајућег филтера. Слично, дефинисали смо улазни наслов и улазну поруку. Затим смо дефинисали одредиште на којем желимо да направимо падајућу листу, а затим бисмо ћелију попунили бојом.
Да бисте покренули код, притисните тастер Ф5 на тастатури
- Падајућа листа ће бити креирана за земље.
- Такође, ћелија ће бити испуњена бојом.
- Такође, кад год унесемо назив нове земље у опсег, падајућа листа ће аутоматски изабрати назив земље.
- Порука ће се појавити у изабраној ћелији у опсегу А1: А10.
На овај начин можемо додати улазну поруку у валидацију података путем ВБА у Мицрософт Екцелу.
Ако вам се допадају наши блогови, поделите их са пријатељима на Фацебооку. Такође нас можете пратити на Твиттер -у и Фацебоок -у.
Волели бисмо да чујемо од вас, реците нам како можемо побољшати, допунити или иновирати наш рад и учинити га бољим за вас. Пишите нам на веб локацији е -поште