Hallo,
würde gerne den Output mehrerer Indikatoren mit Visual Basic in eine Excel Tabelle (zweidimensionales Array) füllen.
Die Investox Funktion "Chart Kopieren" ist mir ein wenig zu aufwendig.
Bei einem Output geht das noch ganz gut. Aber einem zweidimensionalen Array stehe ich irgendwie auf dem Schlauch.
Hier mal mein Code der bei einem Indikator Output funktioniert.
Dim Feld1() As Single
Feld1 = cDaten(Parameter(1))
Dim Start1 As Long
Dim End1 As Long
Start1 = LBound(Feld1)
End1 = UBound(Feld1)
If SetzeGrenzen(Feld1, Start1, End1) <> True Then
Calculate = ErrNoData
Exit Function
End If
Open "C:\Fill_in_Excel.xls" For Output As #1
Dim k As Single
For k = Start1 To End1
Print #1, Feld1(k)
Next k
Close #1
In VBA ging das doch mal so, soweit ich mich erinnern kann.
"Cells" und "FormulaR1C1" laufen aber In Visual Basic 6 nicht.
For j = 1 To TotalCols
For k = 1 To TotalRows
Cells(k , j).FormulaR1C1 = OutputData(k * j)
Next k
Next j
Kann mir da jemand weiterhelfen?
Gruß
Alex