检查一个列在Excel vbmacros中是否有效

我有一个列名（A，B，C，AB，AC ,,,,）存储在stringvariables中。我的需求是获取列号。 在此之前，我只想检查给定的列名是否有效。 例如AD,AC,DF,ER,FC,KL在World,kavisuja无效的地方有效。 如果我有有效的列名，我可以通过以下代码获得：

 Range(ColumnChar & 1).Column 

我怎么能做到这一点..任何人都可以帮助我做到这一点..在此先感谢..

Answer 1

我就是这样做的，在评论中和@YowE3K的想法非常相似：

 Option Explicit Public Sub TestMe() Debug.Print isValid("ZZZ") Debug.Print isValid("ZZ") Debug.Print isValid("ABCD") 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