[GELÖST] Calc: WENNFEHLER nachprogrammieren
Verfasst: Sa, 29.07.2017 23:55
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 Code will nicht so recht klappen. Mit Open Office Basic hatte ich aber erst ein einziges Mal zu tun...
Derzeit hänge ich bereits daran, die entsprechenden Werte an meine Funktion zu übergeben.
Ich wollte mich nach und nach an die Sache herantasten und ersteinmal herausfinden, was denn genau in einer Variable gespeichert wird, wenn ein fehlerhafter Wert übergeben wird.
Folgendes habe ich daraufhin in eine beliebige Zelle eingetragen:
=WENNFEHLER(1;2) -> Es erscheint die Bildschirmausgabe "1" und in der Zelle wird eine 2 eingetragen.
=WENNFEHLER(NV();2) -> Es erscheint KEINE Ausgabe und in der Zelle wird ein NV eingetragen.
Bei letzterem bringt es auch nichts, einen Debugging-Haltepunkt auf die MsgBox zu legen... Die Funktion wird praktisch überhaupt nicht ausgeführt.
Könnt ihr mir bitte weiterhelfen? Vielen Dank!
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 Code will nicht so recht klappen. Mit Open Office Basic hatte ich aber erst ein einziges Mal zu tun...
Derzeit hänge ich bereits daran, die entsprechenden Werte an meine Funktion zu übergeben.
Ich wollte mich nach und nach an die Sache herantasten und ersteinmal herausfinden, was denn genau in einer Variable gespeichert wird, wenn ein fehlerhafter Wert übergeben wird.
Code: Alles auswählen
Public Function WENNFEHLER(EingabeWert As Variant, WertWennFehlert As Variant) As Variant
MsgBox EingabeWert
WENNFEHLER = WertWennFehlert
End Function
=WENNFEHLER(1;2) -> Es erscheint die Bildschirmausgabe "1" und in der Zelle wird eine 2 eingetragen.
=WENNFEHLER(NV();2) -> Es erscheint KEINE Ausgabe und in der Zelle wird ein NV eingetragen.
Bei letzterem bringt es auch nichts, einen Debugging-Haltepunkt auf die MsgBox zu legen... Die Funktion wird praktisch überhaupt nicht ausgeführt.
Könnt ihr mir bitte weiterhelfen? Vielen Dank!