[MS Access] Funzione ARROTONDA non definita nell'espressione

Discussione in 'MS Access' iniziata da gianphy, 19 Settembre 2019.

  1. gianphy

    gianphy Nuovo Utente

    Registrato:
    19 Settembre 2019
    Messaggi:
    3
    Mi Piace Ricevuti:
    0
    Punteggio:
    1
    Sesso:
    Maschio
    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: 19 Settembre 2019
  2. Max 1

    Max 1 Super Moderatore Membro dello Staff SUPER MOD MOD

    Registrato:
    29 Febbraio 2012
    Messaggi:
    3.859
    Mi Piace Ricevuti:
    286
    Punteggio:
    83
    Sesso:
    Maschio
    @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
     
Sto caricando...

Condividi questa Pagina