excel - 通过 vba 设置验证时出现错误 1004

Question

我正在使用 XL365 通过 vba 在单元格上基于文本格式的列表设置验证。列表很长，但这从未引起问题（几个月） - 今天早上在另一台 PC 上的 Excel2013 上也没有。

它现在返回 1004 错误。

上周从头开始设置我的电脑。在今天之前没有再次尝试该代码。观察到今天也安装了一些更新。

用于验证的列表没有改变。从那以后，他们已经很久了。

（me.vars.rng 只是一个在变量容器中定义的简单 Xl 范围）

Public Sub subSetValidationListOnRng(strValidationList As String)
    With Me.Vars.Rng
        On Error Resume Next
        .Validation.Delete
        If Len(strValidationList) = 0 Then Exit Sub
        .Validation.Delete
        On Error Resume Next
        .Validation.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
            xlBetween, Formula1:=strValidationList
        .Validation.IgnoreBlank = True
        .Validation.InCellDropdown = True
    End With
End Sub

标签： excelvba