Excel - 测试范围地址中的两个连续数字是否相同

Question

如果范围地址的数字部分可以除以 11，我想偏移一个范围。
(A11、A22、A33 等)。
取给定工作表中的范围，例如 Range("A2")。
我能不能...

        Dim isRng as Range
        Dim rngAddress as String
        Dim tstAddress as Integer, nsnAddress as Integer
 
        isRng = Range("A2")
        isRng.Select 
        rngAddress = isRng.Address

目前， rngAddress = $A$2 (我认为)。那么，我能不能...

        tstAddress = Right(rngAddress, 2)
        nsnAddress = Right(tstAddress, 1)

        If tstAddress / nsnAddress = 11 Then
             'whatever code
             Set isRng = ActiveCell.Offset(4,0).Select
        Else
        End If 

我希望它在达到 A11 或 A22 之类的任何范围后跳过 4 行。
这行得通吗？有没有更好的方法来做到这一点？我真的很感激帮助。

Answer 1

这应该可以解决问题...

Sub sully_was_here()
    Dim r As Range
    
    Set r = [a22]
    With r
        .Select
        If .Row Mod 11 = 0 Then
            'whatever code here
            .Offset(4).Select
        End If
    End With
End Sub