足し算の組み合わせ
組み合わせの足し算について質問します。
1,2,3という数字があったとします。
たとえば、この1,2,3を2系列用意し、それぞれ足します。
考えやすくするため、2系列を次のようにあらわします。
A系列=1,2,3
B系列=1,2,3
また、A系列の1をA1、B系列の2をB2などのように表現します。
考えられる組み合わせの足し算は次のようになります。
A1+B1=2
A1+B2=3
A1+B3=4
A2+B1=3
A2+B2=4
A2+B3=5
A3+B1=4
A3+B2=5
A3+B3=6
そして、ここから重複を排除すると、残る足し算の結果は、
2,3,4,5,6となります。
これをVBAでプログラミングしたいのですが、どのように考えればよいでしょうか。
もちろん、実際は、1,2,3・・・xまで可変とし、系列数も可変とします。
ただし、すべての系列は同じです。
つまり、A系列=1,2,3、B系列=1,2,3,4ということはありません。
たとえば、A系列が1,2,3,4だったら、のこりの系列もすべて1,2,3,4です。