[MS Access] Funzione ARROTONDA non definita nell'espressione

gianphy

Nuovo Utente
19 Set 2019
3
0
1
Salve,

in STRUMENTI DATABASE/VISUAL BASIC ho creato nuovo MODULO per definire la seguente funzione:
Codice:
Function Arrotonda(numero As Variant) As Variant

If numero = "" Then
    Exit Function
End If

Dim valore As Currency

valore = Fix(numero * 1000)

    If Right$(valore, 1) >= 5 Then
    valore = valore + 10
    End If

valore = Fix(valore / 10) / 100
Arrotonda = valore
End Function
ma quando la richiamo in una query Access mi segnala in pop up: Funzione 'arrotonda' non definita nell'espressione.




Come posso risolvere?



P.S.: non consigliatemi di utilizzare la funzione ROUND in quanto sbaglia gli arrotondamenti sull'euro.
 
Ultima modifica di un moderatore:

Max 1

Super Moderatore
Membro dello Staff
SUPER MOD
MOD
29 Feb 2012
3.939
294
83
@gianphy
Da regolamento del forum, come tutti noi sei tenuto ad usare il tag
code.gif
quando posti del codice, oppure la funzione codice dalla barra degli strumenti
box inserisci 2.png.JPG

Inoltre IMPORTANTE: Prima di creare una nuova discussione o di rispondere alle discussioni esistenti ricordati di leggere attentamente il Regolamento del Forum e l'eventuale regolamento specifico della sezione!
Grazie
Per questa volta te lo sistemo io ma mi raccomando per il futuro