通过循环调试

Question

我想调试，但是陷入循环。

我试图添加断点。

我已经尝试过了，但这对我不起作用。这就是我想要超越的。

    Private Sub UserForm_Activate()
    Dim unique As Range
    Dim sh As Worksheet
    Set sh = Worksheets("Vlookups")

    For Each Sales In sh.Range("Sales")
        Me.ComboBox1.AddItem Sales.Value
    Next Sales

    End Sub

调试器将转到下一个Sub。