vba - 範囲内の次の値を見つける

Question

別のシートからセルの定義された範囲を介してセルの値を進める「次のサイト」ボタンをユーザーがアクティブにすることを探しています。ボタンが押されるたびに、範囲内の次の項目の値を返す必要があります

これまでのところ、私は持っています:

Sub NextSite()
 Set EXCEPTION = Sheets("EXCEPTION")
 Set CONTROL = Sheets("CONTROL")
 Dim rCell As Range
 Dim rRng As Range

 CurrentVal = EXCEPTION.Range("B16")

 Set rRng = CONTROL.Range("B9:B72")

 For Each rCell In rRng.Cells
    If CurrentVal = rCell.Value Then
        GoTo NextCell
        Else
        ActiveCell.Formula = CONTROL.Range(rCell.Address)
        Exit For
    End If
NextCell:
Next rCell

End Sub

ここにアイデアの始まりがあると思いますが、範囲全体の作業の流れを完全に理解することはできません.

また、誰かがアドバイスを提供できる場合は、リスト内の前のサイトを見つける別のコードを用意したいと思います。