Wetterdaten aus Array in Punktdiagramm
26.09.2012 11:29:37
Tabellen
ich habe nach stundenlangem Suchen leider keine Lösung gefunden.
Ich habe eine Tabelle mit Wetterdaten (8760 Zeilen, Feuchte als X-Werte im Diagramm von P18:P8777, Temperatur als Y-Werte im Diagramm von O18:O8777).
Diese Daten habe ich in die Array "PsychroMatrix" übergeben.
Wie kann ich diese Daten einem Punktdiagramm zuordnen?
Das Ergebnis ist ein Streudiagramm (Mollier h,x-Diagramm), auf dem die Aussenluftzustände eines Jahres, einer Klimazone, zu sehen sind.
Das ist mein bisheriger Code (er funktioniert soweit - ich kann die Werte der Matrix im VBA Direktfenster überprüfen):
Option Explicit
Sub WetterdatenAuslesen()
Dim PsychroMatrix() As Variant
Dim AnzahlZeilen As Integer
Dim i As Integer
Dim e As Integer
Sheets("Wetterdaten_Werte").Activate
Debug.Print "In der Tabelle befinden sich " & _
ActiveSheet.UsedRange.Rows.Count & "Datensätze"
AnzahlZeilen = ActiveSheet.UsedRange.Rows.Count
ReDim PsychroMatrix(1 To AnzahlZeilen, 15 To 16)
i = 18
e = 18
For i = 18 To AnzahlZeilen Step 1
PsychroMatrix(i, 15) = Cells(e, 15).Value
PsychroMatrix(i, 16) = Cells(e, 16).Value
Debug.Print PsychroMatrix(i, 15) & " " & PsychroMatrix(i, 16)
e = e + 1
Next i
End Sub
Das Tabellenblatt mit den Werten hat den Namen:"Wetterdaten_Werte"
Das Tabellenblatt mit dem vorkonfigurierten Diagramm hat den Namen: "Aussenluftzustaende"
Danke für eure Hilfe