OpenOffice.info

Ich habe den Work-Around nun fertiggestellt und damit das Problem zufriedenstellend gelöst. :-)

Anbei der Code:
Public Function ZWISCHENSPEICHER(Optional Wert As Variant) As Variant
If IsMissing(Wert) Then
On Error Goto NewProp1
Weiter1:
ZWISCHENSPEICHER = ThisComponent.DocumentProperties ...

Ich habe mich jetzt an einem Work-Around probiert, aber auch das klappt nicht...

Meine Idee war folgende:
Dim Sicherung As Variant

Public Function WERTSPEICHER(Optional Wert As Variant) As Variant
If IsMissing(Wert) Then
WERTSPEICHER = Sicherung
Else
Sicherung = Wert
WERTSPEICHER = Wert
End ...

Hallo Stephan,
zunächst einmal vielen Dank für deine Antwort!


ersatzweise verwenden:

=WENN(ISTFEHLER(NV());2;"")

Der Wert 2 war nur ein Beispiel. Auch in diesem Fall müsste ich dann ggf. die komplette Formel zwei mal eingeben.
Quasi:
=WENN(NICHT(ISTFEHLER(<sehr sehr lange Funktion>)); <sehr ...

Hallo an alle!
Ich möchte ein Dokument in OO Calc erstellen und dabei die aus Excel bekannte Funktion WENNFEHLER() einbauen. Da diese in OO Calc fehlt, möchte ich diese nachprogrammieren.
Ich habe bereits etwas MS Office VBA-Erfahrung und hatte mir das eigentlich ganz leicht vorgestellt, aber der ...