How to change a variable using select case

I have the code shown below and i want to shorten it through a loop.

    Select Case ComboBox5.ListIndex
        Case 0: Rowa = 1
                Call ActivateRow

        Case 1: Rowa = 2
                Call SelectCombobox1

        Case 2: Rowa = 3
                Call SelectCombobox1

        Case 3: Rowa = 4
                Call SelectCombobox1

        Case 4: Rowa = 5
                Call SelectCombobox1

        Case 5: Rowa = 6
                Call SelectCombobox1

        Case 6: Rowa = 7
                Call SelectCombobox1

        Case 7: Rowa = 2
                Call SelectCombobox2

        Case 8: Rowa = 3
                Call SelectCombobox2

        Case 9: Rowa = 4
                Call SelectCombobox2
End Select

I wrote this, but didn't work. It seems that j and k increase their value every time i run the select case method and not when case 0 to 9 are been called.

        
    Select Case ComboBox5.ListIndex    
             Case 0: Rowa = 1
                    Call ActivateRow
                    j = 1
                    
            Case 1 To 6
                    Rowa = j + 1
                    j = j + 1
                    Call SelectCombobox1
                    k = 1

            Case 7 To 9
                    Rowa = k + 1
                    k = k + 1
                    Call SelectCombobox2
End Select