Programmatically Extracting Validation List

[Barb Reinhardt]

I have a selection that has a validation list attached to it and I'd like to
extract the list that's tied to it programmatically. How would I go about
doing that?

Thanks,
Barb Reinhardt

 

[sebastienm]

Say you want the data validation list associated with the active cell

dim address as string
dim rg as range
address=activecell.Validation.formula1
set rg=application.range(address)

 

[sebastienm]

ACtually Formula1 returns '=' in front of the range address. So instead, use:
address = strings.replace(activecell.Validation.formula1,"=","")