I'm running the following code to add a data validation list (dynamic range)
to a cell. About 30% of the time it spits out an Error 1004 but the rest of
the time it works. I dont do anything differently between the runs

Any ideas?


With Range("D7").Validation
.Delete
.Add Type:=xlValidateList, Formula1:="=val1"
.IgnoreBlank = True
.InCellDropdown = True
End With