Clever-Excel-Forum

Normale Version: Excel Messdatentabelle nur noch in 3 Spalten
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hey,
ich habe eine Excel Tabelle mit sehr vielen Messwerten die wie folgt aufgebaut ist.
[
Bild bitte so als Datei hochladen: Klick mich!
]
Prinzipiell ja sehr einfach, in der Spalte A sind meine x-Werte, in Zeile 1 meine y-Werte und jeder x/y-Kombination ist halt ab der Zelle B2 ein z-Wert zugeordnet.

Für die Auswertung in Gnuplot brauche ich aber eine Tabelle mit nur drei Spalten (x,y,z) aus sämtlichen Kombinationen der vorhandenen Tabelle.  

Gibt es eine Funktion mit der ich die Tabelle dahingehend umwandeln kann?

Vielen Dank vorab!
Hallo,

eine Variante wäre, die Daten über Powerquery zu "entpivotieren".

siehe: http://www.excel-ist-sexy.de/schlagwort/entpivotieren/
Vorschlag:

    A     B     C   D bis  I
1
2       deine Tab
3
bis
23

Neu Tab
                A                B               C
26      X Werte      Y Werte      Z Werte     'Überschrift ist nötig
27      Formel 1     Formel 2     Formel 3

Formel 1  =INDEX(A:A;(ZEILE(A1)+MAX($1:$1)-1)/MAX($1:$1)+1;1)
2             =WENN(A27=A26;B26+1;1)
3             =INDEX($B$2:$I$23;VERGLEICH(A27;$A$2:$A$23;0);VERGLEICH(B27;$B$1:$I$1;0))
Im Prinzip:


Code:
Sub M_snb()
   sn = Sheet1.Cells(1).CurrentRegion
   
   ReDim sp(UBound(sn) * (UBound(sn, 2) - 2), 2)
   
   For j = 0 To UBound(sp) - 1
      x = j \ (UBound(sn, 2) - 2)
      y = j Mod (UBound(sn, 2) - 2) + 2
      
      sp(j, 0) = sn(x + 1, 1)
      sp(j, 1) = sn(x + 1, 2)
      sp(j, 2) = sn(x + 1, y + 1)
    Next
    
    Cells(1).Offset(, UBound(sn) + 2).Resize(UBound(sp), 3) = sp
End Sub

NB. Lösche Zeile 1 bevor das Makro laufen zu lassen.
Ich wollte mich noch einmal bei allen für die Hilfe bedanken, durch den Tipp von DER STEUERFUZZI und dann mit Excel 2016 hat es ganz einfach geklappt.
Vielen Dank