Hallo zusammen,
ich möchte in ooBasic gerne die Calc-Funktion Tage360 verwenden.
Dazu habe ich folgende Funktion programmiert:
Function Tage30(Datum1, Datum2) as Integer
oFunctionAccess = createUnoService( "com.sun.star.sheet.FunctionAccess" )
Dim args(1) as Date
args(0) = Datum1
args(1) = Datum2
Tage30 = oFunctionAccess.callFunction("Tage360",args())
End Function
Diese rufe ich wie folgt auf, wobei Vordatum beispielsweise 30.03.2004 und Vergleich 01.05.2004 ist:
Zinstage = Tage30(Vordatum,Vergleich)
Die Übernahme der Werte in die Funktion klappt auch einwandfrei. args(0) ist dann 30.03.2004 und args(1) 01.05.2004.
Ich bekomme jedoch immer den Fehlerhinweis: Basic-Laufzeitfehler, Objektvariable nicht belegt.
Wenn ich args als String deklariere erhalte ich den Fehlerhinweis: Basic-Laufzeitfehler, es ist eine Exception aufgetreten,
Type: Com.Sun.Star.Container.NoSuchElementException, Message: .
Als Integer kann ich args nicht deklarieren, da bekomme ich den Hinweis "unzulässiger Wert", da Datum1 + 2 ja Datenformat haben.
Selbst wenn ich args gar nicht deklariere (also als Variant bestehen lasse) bekomme ich den Fehlerhinweis Objektvariable nicht belegt.
Wie muss ich den Code ändern oder was muss ich berücksichtigen, um die Funktion Tage360 in ooBasic nutzen zu können?
Vielen Dank und viele Grüße
Lupo
Tage360-Funktion
Moderator: Moderatoren
Re: Tage360-Funktion
Code: Alles auswählen
Function Tage30(Datum1, Datum2) as Integer
oFunctionAccess = createUnoService( "com.sun.star.sheet.FunctionAccess" )
Dim args(1)
args(0) = Datum1
args(1) = Datum2
Tage30 = oFunctionAccess.callFunction("DAYS360",args())
End Function
http://www.galileocomputing.de/download ... _de_en.pdf
Gruß
Stephan
Re: Tage360-Funktion
Vielen Dank für die schnelle Antwort!
Das ist echt ein klasse Forum hier.
OpenOffice macht mir immer mehr Spaß, schade dass wir es (noch) nicht auf der Arbeit nutzen ...
Viele Grüße
Lupo
Das ist echt ein klasse Forum hier.
OpenOffice macht mir immer mehr Spaß, schade dass wir es (noch) nicht auf der Arbeit nutzen ...
Viele Grüße
Lupo
Re: Tage360-Funktion
Hi Stephan,
ich bekam zunächst noch den gleichen Fehler.
args muss als String deklariert werden. Dann klappt's.
Vielen Dank nochmal.
Lupo
ich bekam zunächst noch den gleichen Fehler.
args muss als String deklariert werden. Dann klappt's.
Vielen Dank nochmal.
Lupo
Re: Tage360-Funktion
kann ich nicht bestätigen.ich bekam zunächst noch den gleichen Fehler.
args muss als String deklariert werden. Dann klappt's.
Tage360 (bzw. Days350) sollte beides akzeptieren, denn die Übergabe der Datumsparameter als String bewirkt lediglich das die Anzeige der Formel innerhalb der GUI nicht in eine serielle Zahl gewandelt wird.
Gruß
Stephan