I have also tried setting the Formula1 parameter to a hard-coded list,
just to see if that might make a difference - but I still get the same
error. If anyone can help me, I would greatly appreciate it! Thanks!

Theresa

With lwDisplaySheet.Cells(lrNewRow.Row, "Z").Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop,
Operator:=xlBetween, Formula1:="LV1, LV2"
.IgnoreBlank = False
.InCellDropdown = True
.InputTitle = ""
.InputMessage = ""
.ErrorTitle = "Select New Opportunity Code"
.ErrorMessage = "You must select one of the codes in the
list."
.ShowInput = False
.ShowError = True
End With



*** Sent via Developersdex http://www.developersdex.com ***