主页 / computer / 问题 / 1669035
Accepted
PhilHibbs
Asked: 2021-08-13 05:43:17 +0800 CST

如何找到单元格的验证列表？

  • 772

我有一个具有验证规则的电子表格，因此单元格显示有效答案的下拉列表。这些答案保存在电子表格的其他地方，但数量很多，名称很复杂，而且表格通常是隐藏的。

我想在电子表格中找到存储这些有效答案的位置。

如何导航 Excel VBA 对象以从单元格中查找此答案列表的位置？

microsoft-excel vba

2 个回答

  1. 您可以使用功能区中的数据 > 数据验证通过弹出对话框设置单元格的验证。如果您对已设置验证的单元格执行相同操作，则弹出窗口将显示先前设置的验证。

    如果该验证是一个列表，则显示列表的源范围，然后单击源范围旁边的小电子表格图标将您带到它。

    • 1
  2. Best Answer
    Sub ShowValidValues()
    Dim oCell As Range
    Dim vValidation As Variant
    Dim vList As Variant
    Set oCell = ActiveCell
    On Error GoTo noval
    vList = oCell.Validation.Formula1
    If Left(vList, 5) = "=list" Then
        vList = Mid(vList, 2, 99)
        Dim oRange As Range
        Set oRange = Range(vList)
        Sheets(oRange.Parent.Name).Visible = True
        Sheets(oRange.Parent.Name).Activate
        oRange.Activate
    End If
noval:
    On Error GoTo 0
End Sub

    这将从当前单元格中找到列表，使工作表可见，切换到它，并激活单元格范围。

    • 0

相关问题