Excelデータの伝播

Propagateは正しい単語ではないかもしれませんが、質問を「結合」および「結合」するために見つけた答えは当てはまらないようです。

2つのまったく異なるデータシートがあります。たとえば、sheet1にはアイテムの列があり、sheet2には色の列がある場合があります。最終的に、他の2枚の列のすべての可能な組み合わせを含む1枚のシートに2つの列が必要です。

したがって、上記の例では、sheet1に140項目があり、sheet2に17色がある場合、sheet3に項目列、色列、および2,380レコード（各項目と色の組み合わせごとに1つ）が必要です。

以下に、簡単に適応できる例を示します。

我々が持っている保存7列内の項目Aと3列の色Bを。この短いマクロの実行：

Sub combine()
    Dim K As Long, i As Long, j As Long, Nitems As Long, Ncolors As Long

    K = 1
    Nitems = 7
    Ncolors = 3

    For i = 1 To Nitems
        For j = 1 To Ncolors
            Cells(K, "C").Value = Cells(i, "A").Value & "," & Cells(j, "B").Value
            K = K + 1
        Next j
    Next i
End Sub

列Cでこれを生成します。