Excel mit Spalten aus Zeilen füllen

390
Oxmaster

Ich habe keine Ahnung, wie ich das benennen soll, so dass andere es leichter haben werden, nach diesem Thema zu suchen.

Nehmen wir an, ich habe in Tabelle1 eine Tabelle mit Titel, Vorname, Nachname, Straßenname, Ort und Postleitzahl. In Tabelle2 kann ich CONCATENATE oder Referenzen auf die Zellen verwenden, um eine Kombination all dieser Werte zu erstellen, um ein Adressetikett für einen Umschlag zu erstellen. In Sheet2 verwende ich das Seitenlayout, um einen besseren Überblick über die Druckausgabe zu erhalten und die Zellengrößen und Ränder anzupassen.

Nehmen wir an, die Sheet2-Seite hat 8 Zeilen und 3 Spalten. Ich kann die erste Spalte füllen, indem ich die Zelle automatisch fülle, aber dann komme ich zum Ende der Seite. Um die nächste Spalte zu füllen, muss ich die Formel aus der letzten Zeile der ersten Spalte kopieren und die Daten manuell in +1 ändern und dann erneut ziehen. Wie: =CONCATENATE(Sheet1!A9;" ";Sheet1!B9;" ";Sheet1!C9;CHAR(10);Sheet1!D9)zu =CONCATENATE(Sheet1!A10;" ";Sheet1!B10;" ";Sheet1!C10;CHAR(10);Sheet1!D10) und dann bis zum Ende der Spalte ziehen und die Formel erneut ändern.

Gibt es eine Möglichkeit, alle Zellen automatisch von oben links nach rechts unten zu füllen? Beispielbild

Ich möchte VBA möglichst vermeiden.

0
Der einfachste Weg, um das zu erreichen, was Sie versuchen, wäre mit einem Seriendruck in Word. Öffnen Sie das Wort und wählen Sie eine Etikettenvorlage. Stellen Sie die Datenquelle auf Ihre Excel-Tabelle ein und füllt die Etiketten automatisch in der richtigen Reihenfolge aus. user218076 vor 6 Jahren 1

1 Antwort auf die Frage

0
p._phidot_

In Bezug auf :

"8 Zeilen und 3 Spalten"

Unter der Annahme, dass die erste Zeile die erste Spalte ist, ist die Zelle A1. Die letzte Zelle (3. Spalte, 8. Zeile) wird C8 sein.

Sheet1!A9Verwenden indirect("Sheet1!A"&(9+(COLUMN(A1)-1)*8+ROW(A1)-1)Sie also statt .. die vollständige Formel:

=CONCATENATE(Sheet1!Aindirect("Sheet1!A"&(9+(COLUMN(A1)-1)*8+ROW(A1)-1));" ";Sheet1!Bindirect("Sheet1!A"&(9+(COLUMN(A1)-1)*8+ROW(A1)-1));" ";Sheet1!Cindirect("Sheet1!A"&(9+(COLUMN(A1)-1)*8+ROW(A1)-1));CHAR(10);Sheet1!Dindirect("Sheet1!A"&(9+(COLUMN(A1)-1)*8+ROW(A1)-1)))