excel - 如何检查字符串是否是有效的列名？

Question

我将列名(A、B、C、AB、AC、、、、)存储在字符串变量中。

我的要求是获取列号。在此之前，我想检查给定的列名是否有效。例如 AD,AC,DF,ER,FC,KL在 World,kavisuja 处有效无效。

如果我有有效的列名，我可以通过以下代码获得:

Range(ColumnChar & 1).Column

Answer 1

这就是我的做法，与评论中@YowE3K 的想法非常相似:

Option Explicit

Public Sub TestMe()

    Debug.Print isValid("ZZZ")    'False
    Debug.Print isValid("ZZ")     'True
    Debug.Print isValid("ABCD")   'False

End Sub

Public Function isValid(strInput As String) As Boolean

    On Error GoTo isValid_Error

    Dim rngSet  As Range
    Set rngSet = Range(strInput & "1")
    isValid = True

    On Error GoTo 0
    Exit Function

isValid_Error:
End Function

该函数的默认值为 False , 因此如果它没有设置为 True它给出了 False默认。