Hallo,

folgender Code-Snippet zeigt die Verwendung der Methode Jahreschart im ArrayLoader.

Dim arrayLoader As New TaiPanRTLib.arrayLoader
Dim colJahr As TaiPanRTLib.JahreschartCollection
Dim jahreEntry As TaiPanRTLib.JahresChart
Dim entry As TaiPanRTLib.IJahreschartEintrag
Dim SymbolNr As Long

SymbolNr = 79514 'symbolnr vom dax
Set colJahr = arrayLoader.Jahrescharts(SymbolNr, "01.01.2006", "01.01.2007")
For Each jahreEntry In colJahr
For i = 1 To jahreEntry.count
Set entry = jahreEntry.item(i)
Debug.Print entry.Zeit & " " & entry.Open & " " & entry.High & " " & entry.Low & " " & entry.Close
Next
Next

---

Entwicklung | Lenz+Partner GmbH | vwd group

Phone: +49 231 9153-300 | Fax: +49 231 9153-399
entwicklung@lp-software.de | www.LP-software.de | www.vwd.com