Hello,

I am seeking a way to specify the validation formula1 with a string. The
values themselves my contain commas.

With Names(NamedRange).RefersToRange

.Validation.Delete
.Validation.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop,
Operator:=xlBetween, Formula1:="10,000, 11,000"
.Validation.IgnoreBlank = True
.Validation.InCellDropdown = True
.Validation.InputTitle = ""
.Validation.ErrorTitle = ""
.Validation.InputMessage = ""
.Validation.ErrorMessage = ""
.Validation.ShowInput = True
.Validation.ShowError = True

End With


Thanks in advance.

I think you'll have to put that list in a range on a worksheet (hidden sheet and
the range nicely named) if the values will include commas.

AMDRIT wrote:

Hello,

I am seeking a way to specify the validation formula1 with a string. The
values themselves my contain commas.

With Names(NamedRange).RefersToRange

.Validation.Delete
.Validation.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop,
Operator:=xlBetween, Formula1:="10,000, 11,000"
.Validation.IgnoreBlank = True
.Validation.InCellDropdown = True
.Validation.InputTitle = ""
.Validation.ErrorTitle = ""
.Validation.InputMessage = ""
.Validation.ErrorMessage = ""
.Validation.ShowInput = True
.Validation.ShowError = True

End With

Thanks in advance.

--

Dave Peterson