如题,例:a1:a10这个范围表示是正确的,而aaa10:8是不对的,有没有现成的函数,自定义函数太麻烦

解决方案 »

  1.   

    if Typeof Range(aaa10:8) is Range then do anything that you want.
    上边的格式应该可以判断吧!
      

  2.   

    用 on error 来做
    Sub test()
        On Error Resume Next
        ads = "a1:f5f"
        s = ""
        s = Range(ads).Address
        If s = "" Then
            MsgBox ads & " 表达式错误"
            Exit Sub
        End If
        On Error GoTo 0
        MsgBox "继续执行后面的代码"
    End Sub
      

  3.   

    Excel 自带有个函数可以实现,自己找找看
      

  4.   


    Sub Rg()
        Dim rng As Range    On Error GoTo 1
        Set rng = Range(InputBox("Please Input A Range:"))
        MsgBox "Good!": Exit Sub
    1:     MsgBox "Is Error!"
    End Sub