Excel VBA to Create Data Validation List from Range with Filter

[VIorica000]

Hello everyone,


I have the following situation:
I have to add a data validation from a range but applying a filter

My Data Validation must be composed from the following list (Activity) only when the column TYPE = 1

how to apply a filter in the VBA for a data validation?

Sub PopulateFromANamedRange() Range("A18").Validation.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, _ Formula1:="=Activity" .IgnoreBlank = True .InCellDropdown = True .InputTitle = "" .ErrorTitle = "Error" .InputMessage = "" .ErrorMessage = "Please Provide a Valid Input" .ShowInput = True .ShowError = True End Sub

 

[RoryA]

You can't. You either need to create a delimited text string with all the relevant values in it, or use the FILTER function to create a list in another range, and then use that range as the source for your data validation.