仅针对那些数字的指定范围的排列

Question

我是编码的新手，我已经设法获得了一个代码，它会像我想要的那样创建一个列表，除了唯一的问题是它执行每个整数。每当我试图将它设置为偏离范围时它就不会运行，所以我有点难过，但我正朝着正确的方向前进。

Sub Perm()
Dim a As Integer
Dim b As Integer
Dim u As Integer
    u = Range("E1")
    Debug.Print u
        For a = Range("E1") To Range("E16")
            For b = Range("E1") To Range("E16")
                Cells(u, 1).Value = a
                Cells(u, 2).Value = b
                u = u + 1
            Next b
        Next a
End Sub

到目前为止，我有这个代码，它可以为我提供我需要的东西，但它可以完成所有整数，而不仅仅是例如100,102,104,106。 我现在要做的是让它吐出以下

100 102
100 104
100 106
102 104
102 106
104 106