VBA-UniSim

[Tobi1986R]

Zuviel Werbung?
-> Hier kostenlos registrieren

Hallo liebe Experten,

ich möchte aus UniSim Variablen exportieren und dazu ein "Spreadsheet" nutzen. Das Handbuch zum customizen gibt dazu folgenden Beispielcode her:

Dim hySS As SpreadsheetOp

Dim hyCell As SpreadsheetCell
Set hySS =

hyCase.Flowsheet.Operations(“spreadsheetop”).Item(0)

Dim x As Variant, y As Variant
For i = 0 To 5
x = 1 ' col #
y = i ' row #
Set hycell = hySS.Cell(x,y)
Debug.Print “CELL VALUE = “ & hyCell.CellValue
Debug.Print “CELL FORMULA = “ & hyCell.CellText
Debug.Print “CELL PROPERTY = “ & hyCell.VariableName
& “ (“ & hyCell.Units & “)”
Next i

Zeile 4 gibt mit einen Laufzeitfehler "91" aus. Das liegt meiner Meinung nach an der Anweisung .Item(0)

Jetzt die Frage: wozu ist diese Anweisung eigentlich da und wie bringe ich das ganze geraffel zum laufen?
Sorry bin nicht so fit im Programmieren

Danke schonmal vorab!

 

[Tobi1986R]

OK habs selbst hin bekommen.

das Beispiel ist so nicht korrekt. Es muss wie folgt heißen:

hycase.Flowsheet.Operations.Item("spreadsheetname")


jetzt bringt mir die Anweisung ".CellValue" zwar noch einen Fehler aber das werd ich wohl auch noch hin bekommen.

 

[Tobi1986R]

Zuviel Werbung?
-> Hier kostenlos registrieren

Läuft.
War UniSim-spezifisch. Wer Interesse hat wie es funktioniert kann sich gerne melden.