Excel VBA - 如何验证输入是否在某个列中

Question

我有一个脚本，要求一个起始单元格

Set myCell = Application.InputBox( _
prompt:="Choose a starting field", Type:=8)

If myCell = Null Or myCell = "" Or Len(myCell.Value) < 3 Or Len(myCell.Value) > 12 Then
    MsgBox "Incorrect cell value"
    Exit Sub
    Else

因此，我对给定单元格的值进行了这些检查，因此如果验证没有通过，脚本将无法运行。 我需要的是验证以检查某列中的单元格（在我的情况下是D）。

所以我需要验证说“是D列中的选定单元格？” 如果是，请继续，如果没有停止。

我一直在谷歌搜索试图找到这种比较，但我只是没有给它一个很好的查询。

任何帮助表示赞赏。 谢谢

Answer 1

在Rich Holton的帮助下，我找到了解决方案。

为了检查输入单元格是否在您希望它的列中，可以使用以下语法：

If myCell.Column <> 4 Then
...
End If

其中4在这种情况下等于D列。 （A列= 1，B列= 2，依旧......）