Verketten / Pivot-Tabelle

Forumthread: Verketten / Pivot-Tabelle

16.07.2007 10:19:34

Thomas

Hallo,
ich habe wieder mal ein Problem mit Excel.
Ich habe derzeit eine Spalte mit bestimmen Inhalten.
Das ganze soll hinterher in der Pivot-Tabelle ausgewertet werden.
Um das jetzt auch alles in der richtigen Reihenfolge hinzubekommen, habe ich noch eine andere Tabelle angelegt mit den Begriffen aus der einen Spalte.
In der nächsten Spalte zieht er sich mithilfe von SVERWEIS die dazugehörigen Unternummern (von 001. bis 999.99.99.99. )
Um das ganze hinterher in einer Zelle zu Verbinden habe ich die Formel Verketten genommen.
Soweit funktioniert das ja auch alles. Ich habe nur noch Probleme mit der Optik.
Excel setzt ja die Zelle mit der Zahl und den Textinhalt mit einer beliebigen Anzahl von Leerzeichen zusammen. Wie kann ich es aber machen, dass der Text wirklich immer Untereinander steht und nicht so:
001. blabla
999.99.99.99. qwertz
Oder gibt es eine Möglichkeit, der Pivot-Tabelle zu sagen, dass sie einen bestimmten Aufbau haben soll:
Blabla
qwert
zip
Co
etc. Also unabhängig vom Alphabet sondern wirklich eine Fest vorgeschriebene Gliederung.
Bin für jede Hilfe dankbar.
Liebe Grüße
Thomas

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Verketten / Pivot-Tabelle

16.07.2007 14:37:00

Heide_Tr

AW: Verketten / Pivot-Tabelle

16.07.2007 14:37:00

Heide_Tr

hallo Thomas,
ich bin mir nicht sicher, ob ich Deine Frage richtig verstanden habe, aber ich gehe davon aus, dass sich die Frage nach dem Aufbau auf die Sortierung bezieht?
Du kannst die Zeilen und Spalten beliebig sortieren, in dem Du eine Sortierliste anlegst. Über Daten / sortieren / Optionen kannst Du die Werte für die Sortierfolge beliebig vorgeben. Dazu kannst Du aber auch einen benamten Bereich mit den Sortierwerten erstellen auf den Du hier verweist.
Falls sich Deine Daten der Pivot-Tabelle dynamisch ändern können, kannst Du per VBA die Daten aus dem benamten Bereich (hier "Sortierfolge" - besteht nur aus einer Spalte, die Werte stehen in der gewünschten Form untereinander) auslesen, eine benutzerdefinierte Liste erstellen und z.B. dem Spaltenbereich der Pivot-Tabelle zuweisen. Dazu wird ein Array gefüllt:

Sub DatenAktualisieren()
Dim vListArr(18) As String
   'Sortierfolge der Prozesse
   i = 0
   For Each Zelle In Range("Sortliste")
      vListArr(i) = Zelle.Value
      i = i + 1
   Next
   Application.AddCustomList ListArray:=vListArr
   listnum = Application.GetCustomListNum(vListArr)
   Sheets("Prozesse").Range("B4:BL4").Sort _
           Order1:=xlAscending, Type:=xlSortLabels, OrderCustom:=listnum + 1, _
           Orientation:=xlLeftToRight
   Application.DeleteCustomList listnum
End Sub

viele Grüße. Heide

Infobox / Tutorial

Verketten und Sortieren in Pivot-Tabellen

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Daten vorbereiten: Stelle sicher, dass deine Daten in einer Tabelle ordentlich angeordnet sind. Eine Spalte sollte die Hauptinhalte enthalten, während die dazugehörigen Unternummern in einer anderen Spalte stehen.
SVERWEIS verwenden: Nutze die SVERWEIS-Funktion, um die Unternummern entsprechend den Hauptinhalten zu ziehen. Die Formel sieht folgendermaßen aus:
```
=SVERWEIS(A2;Tabelle2!A:B;2;FALSCH)
```
Hierbei ist A2 die Zelle mit dem Hauptinhalt und Tabelle2!A:B der Bereich, in dem die Unternummern stehen.
Verketten: Verwende die Verketten-Funktion (oder die &-Verknüpfung), um die Inhalte in einer Zelle zusammenzuführen. Beispiel:
```
=VERKETTEN(A2; " "; B2)
```
Diese Formel verbindet den Inhalt von A2 und B2.
Optische Anpassungen: Um sicherzustellen, dass die Texte untereinander stehen, kannst du anstelle von Leerzeichen Zeilenumbrüche verwenden. Ändere die Verketten-Formel wie folgt:
```
=A2 & CHAR(10) & B2
```
Vergiss nicht, die Zelle so zu formatieren, dass der Textumbruch aktiviert ist.
Pivot-Tabelle erstellen: Markiere deine Daten und gehe zu Einfügen -> PivotTable, um eine neue Pivot-Tabelle zu erstellen. Wähle die gewünschten Felder aus, um deine Daten auszuwerten.

Häufige Fehler und Lösungen

Fehler: Falsche Werte in der Pivot-Tabelle: Vergewissere dich, dass die Datenquelle korrekt ist und alle Daten aktualisiert wurden.
Fehler: Text nicht untereinander: Stelle sicher, dass der Textumbruch in der Zelle aktiviert ist. Dies kannst du unter Start -> Ausrichtung -> Textumbruch einstellen.

Alternative Methoden

Eine alternative Methode zur Erstellung einer benutzerdefinierten Sortierung in einer Pivot-Tabelle ist die Verwendung von benannten Bereichen. Du kannst die Sortierwerte in einer separaten Tabelle festlegen und dann diese Werte in deiner Pivot-Tabelle verwenden.

Benannten Bereich erstellen: Markiere die Zellen mit den gewünschten Sortierwerten und gehe zu Formeln -> Benannte Bereiche.
Sortieren: Gehe zu Daten -> Sortieren, wähle die benannten Bereiche aus, um die Sortierreihenfolge zu definieren.

Praktische Beispiele

Beispiel für Verketten: Wenn du in Zelle A1 "001. blabla" und in B1 "999.99.99.99. qwertz" hast, kannst du folgende Formel verwenden:
```
=A1 & CHAR(10) & B1
```
Dies sorgt dafür, dass beide Texte untereinander in einer Zelle erscheinen.
Beispiel für benutzerdefinierte Sortierung: Angenommen, du hast eine Liste von Prozessen, die in einer bestimmten Reihenfolge angezeigt werden sollen. Erstelle eine Tabelle mit der gewünschten Sortierreihenfolge und benutze die oben beschriebenen Schritte, um die Pivot-Tabelle entsprechend zu sortieren.

Tipps für Profis

Nutze VBA, um komplexe Datenmanipulationen zu automatisieren. Der folgende Code kann dir helfen, eine benutzerdefinierte Sortierung dynamisch zu erstellen:

Sub DatenAktualisieren()
  Dim vListArr(18) As String
  Dim i As Integer
  i = 0
  For Each Zelle In Range("Sortliste")
      vListArr(i) = Zelle.Value
      i = i + 1
  Next
  Application.AddCustomList ListArray:=vListArr
  listnum = Application.GetCustomListNum(vListArr)
  Sheets("Prozesse").Range("B4:BL4").Sort _
      Order1:=xlAscending, Type:=xlSortLabels, OrderCustom:=listnum + 1, _
      Orientation:=xlLeftToRight
  Application.DeleteCustomList listnum
End Sub

Dieser Code liest die Sortierwerte aus und aktualisiert die Pivot-Tabelle entsprechend.

FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass meine Pivot-Tabelle immer die neuesten Daten anzeigt?
Aktualisiere die Pivot-Tabelle regelmäßig, indem du mit der rechten Maustaste auf die Pivot-Tabelle klickst und "Aktualisieren" wählst.

2. Kann ich mehrere Sortierkriterien in einer Pivot-Tabelle verwenden?
Ja, du kannst mehrere Felder in der Pivot-Tabelle sortieren, indem du die entsprechenden Optionen unter Daten -> Sortieren auswählst und die Reihenfolge festlegst.

Beliebteste Forumthreads (12 Monate)