Hallo,

ich habe eine Funktion nach folgendem Schema geschrieben:

Function fun(ByVal oldKey As Long) As Long

' Komplizierterer SVerweis; falls zu oldKey kein Eintrag existiert gib oldKey zurück

End Function

Diese Funktion funktioniert in VBA (Direktfenster) auch tadellos, in Excel erscheint jedoch nur ein #WERT-Fehler mit dem Hinweis, die Argumente seien vom falschen Typ. Zunächst dachte ich, Excel hätte Probleme, die Longs zu verarbeiten (was ja aber angesichts des kleinen Integer Wertbereichs nicht sein kann) und tatsächlich erhalte ich denselben Fehler, wenn ich alles als Integer deklariere.

Das Ganze wird umso undurchschaubarer, als die Funktion ab und zu doch funktioniert. Da habe ich zufällig entdeckt, dass in alle Zellen, in die ich testweise Formeln eingetragen hatte, plötzlich die richtigen Ergebnisse standen. Ich weiß allerdings nicht, was dazu den Ausschlag gegeben hat (möglicherweise das Hinzufügen von ByVal?), und als ich etwas in eine Zelle eingetragen habe, die nichts mit der Formel zu tun hatte, stand wieder überall #WERT.

Ich bin mit meinem Latein am Ende und werde wahnsinnig, wenn ich meinen Code betrachte, da er ja eigentlich (in VBA) funktioniert. Hoffe jemand von euch kann mir helfen. Vielen Dank im Voraus!

Viele Grüße

Fragesteller