Prova a scrivere questa funzione in un modulo di VBA .
codice:
Public Function A()
A = DSum("[importo]", "operazioni economiche", "[settore di spesa] = 'organizzazione' And([operazione]='EL'Or[operazione]='EC')")
End Function
Dopo richiamando in qualunque punto della applicazione =A()
ti viene restituito il valore desiderato.
___________________________________________
Per quanto riguarda il numero di decimali visualizzato questo
dipende dalla formattazione che darai alle caselle di testo
nelle maschere o reports.
Consiglierei Formato numero "Standard" decimali "2"