Office: (Office 2013) Eigene Funktion bringt plötzlich #NAME?

Hallo zusammen

Für das Runden auf 5 Rappen habe ich folgende Funktion geschrieben (habe ich irgendwo aus dem Internet):

Code:

Nun bringt Excel plötzlich in den Zellen anstelle des Wertes den Fehler #NAME?.

Was läuft hier plötzlich falsch?

Gruss

Caro

:)

 

Hallo Caro,

warum überhaupt eine UDF *wink.gif*
=runden(deineZelle*20;0)/20
der Teil hier müsste ohnehin auch so lauten
AWF.Round(CHF * 20, 0) / 20
statt
AWF.Round(CHF * 20, 1) / 20

und warum bei Dir #Name steht hat den Grund das dein Code nicht in einem allgemeinen Modul steht, wahrscheinlich hast du den Code ins Tabellnblatt kopiert.
Oder Dim AWF as WorksheetFunktion
gehört da nicht ein c hinein?
Dim AWF As WorksheetFunction

 

Hallo,

bei der kompletten Function klappen sich bei mir die Fußnägel hoch.
Wozu Application.Volatile? Wenn Du der Function einen Bereich übergibst, veranlasst eine Änderung dort auch eine Neuberechnung. Gibst Du einen Wert "hart" ein, wird ohnehin neu berechnet (was aber sinnlos ist). Stattdessen wird "bei jedem Pups" neu berechnet.
Ich habe den Übergabe in RANGE geändert - das wird wohl der sinnvollen Verwendung der UDF entsprechen, oder?

Ansonsten die Frage von Chris erweitert: Der Speicherort der Function ist von Interesse! Welche Mappe / Add-In / pers. Makroarbeitsmappe und darin: Welches Modul?

Die Function Public zu machen, kann auch nichts schaden.

Code:

da schreibst Du grad: "Ich, der Verfasser, habe folgenden Code abgeschrieben:" Widersprüchlich, findest Du nicht?

Grüße
EarlFred

 

Hallo zusammen

Danke für Eure Inputs.
Der Fehler war, dass ich dem Modul denselben Namen gegeben habe wie der Funktion. Als ich das geändert habe, hats funktioniert. Also fast. Die Funktion berechnet erst richtig, wenn man /2 und *2 nimmt anstelle von 20.

Alles wieder im grünen Bereich.

Vielen Dank und schönen Tag.

Gruss

caro

 

Hallo caro,

habt ihr 'ne neue Währung?
Ich dachte immer, 1 Rappen wären 1/100 Franken

Du rundest also auf 50 Rappen.

Grüße
EarlFred

 

Hallo EarlFred

Ich kannte die Funktion auch mit 20. Aber wenn Du 20 nimmst, dann rundet Excel komischerweise nicht auf 5 Rappen. Da habe ich 2 probiert und da funktionierts super.

Übrigens habe ich nun Deine Variante verwendet für den Code.

Vielen Dank.

Gruss

Caro

 

Hallo caro,

ich denke nicht in "irgendwo gefundenen Varianten", sondern in "welcher Rechenweg ist richtig".

Und da 5 Rappen = 5/100 bzw. = 1/20 Franken, muss 20 richtig sein.

Oder in Deinen Zellen steht irgendwas anderes...

Grüße
EarlFred

 

Hallo Caro,

gibt es einen Grund dafür das du nicht gleich
mit Runden arbeitest? *wink.gif*

Dann sparst du Dir
VBA und es geht auch schneller

 

Hallo Chris

Es ist nicht für mich. Ich würde auch gleich Runden verwenden. Aber mein Auftraggeber möchte eine Funktion.

Gruss

Caro