2 ListBox для одной пользовательской формы, выберите следующий индекс

Question

У меня есть 2 списка на одной пользовательской форме. При нажатии на кнопку команды, я хочу выбрать следующий элемент, используя «ListIndex + 1». Это хорошо работает для одного listbox2, но я не мог сделать то же самое с ListBox3. Однако, когда я удаляю коды для Listbox3, это работает хорошо только для Listbox2.

With UserForm1.ListBox2
    If UserForm1.ListBox2.ListIndex = UserForm1.ListBox2.ListCount - 1 Then
        UserForm1.ListBox2.ListIndex = 0
    Else
        UserForm1.ListBox2.ListIndex = UserForm1.ListBox2.ListIndex + 1
    End If
End With

With UserForm1.ListBox3
    If UserForm1.ListBox3.ListIndex = UserForm1.ListBox3.ListCount - 1 Then
        UserForm1.ListBox3.ListIndex = 0
    Else
        UserForm1.ListBox3.ListIndex = UserForm1.ListBox3.ListIndex + 1
    End If
End With