使用 VBA 对整个列进行下拉验证答案

【问题标题】：Drop Down Validation for entire column using VBA使用 VBA 对整个列进行下拉验证
【发布时间】：2018-02-09 11:25:52
【问题描述】：

我是 VBA 新手，正在尝试对整个列中的数据进行数据验证。使用以下代码执行此操作。

ActiveSheet.Range("O:O").Select
With Selection.Validation
    .Delete
    .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
    xlBetween, Formula1:="=data_validation!N2:N340"
    .IgnoreBlank = True
    .InCellDropdown = True
    .InputTitle = ""
    .ErrorTitle = ""
    .InputMessage = ""
    .ErrorMessage = ""
    .ShowInput = True
    .ShowError = True
End With

使用此代码，我可以为所选列中的每个单元格获取下拉列表，但下拉列表中的值会在每个相应的单元格中被一一删除。例如，如果在列表中，我有值 [1,2,3,4,5]。在第一个下拉单元格中，我可以选择 [1,2,3,4,5]。在第二个单元格下拉列表中，我可以选择选择 [2,3,4,5] 等等。请帮忙。

【问题讨论】：

标签： excel vba

【解决方案1】：

您已输入验证公式作为相对参考，因此对于每个连续的单元格，验证范围偏移 1 行。因此，输入公式作为绝对参考

=data_validation!$N$2:$N$340

【讨论】：