Excel: Tabellen kombinieren

Excel: Tabellen kombinieren

Ich habe N Tabellen mit M Zeilen für jede Tabelle.

Beispielsweise habe ich zwei Tabellen A und B mit jeweils 4 Zeilen und 2 Zeilen:

Tabelle A

A1

A2

A3

A4

Tabelle B

A1

A2

Ich möchte eine Tabelle C mit 4x2 Zeilen erstellen und alle Zeilenmöglichkeiten kombinieren:

Tabelle C

A1 B1

A1 B2

A2 B1

A2 B2

A3 B1

A3 B2

A4 B1

A4 B2

Gibt es eine Möglichkeit, dies mit Excel zu erreichen, und wenn ja, wie? Vielen Dank.

Antwort1

Angenommen, wir haben zwei Listen wie:

Bildbeschreibung hier eingeben

und wir möchten alle Kombinationen der beiden Listen generieren. Ausführen dieses Makros:

Sub generateCombinations()
    Dim nA As Long, nB As Long, K As Long, i As Long, j As Long
    Dim rc As Long
    rc = Rows.Count
    nA = Cells(rc, "A").End(xlUp).Row
    nB = Cells(rc, "B").End(xlUp).Row
    K = 1

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

wird in Spalte produzierenC:

Bildbeschreibung hier eingeben

Makros sind sehr einfach zu installieren und zu verwenden:

  1. ALT-F11 öffnet das VBE-Fenster
  2. ALT-I ALT-M öffnet ein neues Modul
  3. Füge das Material ein und schließe das VBE-Fenster

Wenn Sie die Arbeitsmappe speichern, wird das Makro mit gespeichert. Wenn Sie eine neuere Version von Excel als 2003 verwenden, müssen Sie die Datei speichern als.xlsmstatt.xlsx

So entfernen Sie das Makro:

  1. Öffnen Sie das VBE-Fenster wie oben
  2. Löschen Sie den Code
  3. Schließen Sie das VBE-Fenster

So verwenden Sie das Makro aus Excel:

  1. ALT-F8
  2. Wählen Sie das Makro
  3. Berühren Sie RUN

Weitere Informationen zu Makros im Allgemeinen finden Sie unter:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

Und

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

Damit dies funktioniert, müssen Makros aktiviert sein!

verwandte Informationen