Ciao, forse ti metto fuori strada, ma hai provato ad inserire
questo codice nel Report.
Se il Recodset originato dalla Qry č nullo viene generato
l'evento NoData, quě puoi interagire.......
'****************************************
Private Sub Report_NoData(Cancel As Integer)
Cancel = True
End Sub
'****************************************
Alex.
>--------------------------------------------------------------------------<
Alessandro B.
E-Mail -----> ik2...@libero.it
Sito web -----> http://digilander.iol.it/ik2zok/
>--------------------------------------------------------------------------<
--
Posted from [212.141.54.103]
via Mailgate.ORG Server - http://www.Mailgate.ORG
Ciao,
scusa se mi intrometto,ma la risposta a cui tu fai riferimento non reisco a
vederla.
Saresti cosě gentile a metterla in copia qui sotto??
Grazie
Davide
In un report ho inserito 3 sottoreport con ognuno una casella di testo che
contiene un calcolo numerico.
Ho poi inserito una nuova casella di testo che mi somma le tre precedenti.
Tutto bene ma se una delle tre caselle ha valore null la casella di somma mi
restituisce Error. Ho provato molte possibili (e vane) soluzioni con la
funzione Null, is Null ecc. Nulla da fare.
La risolutiva risposta di Roberto, che ancora ringrazio:
Ma l'errore te lo dà quando uno o più sottoreport sono vuoti?
Se è così, la casella di testo che contiene il totale del sottoreport vuoto
non ha valore Null, ma non esiste affatto in quanto Access non formatta il
sottoreport se è vuoto; ovvero l'errore lo ricevi non perchè effettui la
somma di un controllo che contiene valore Null (che ti restituirebbe un
valore Null) ma perche per lui il controllo è inesistente.
Secondo me puoi risolvere il problema con tre DSum che creano i totali dei
tre sottoreport, quindi sommando i risultati delle tre DSum utilizzando la
Funione Nz.
Se i tre sottoreport hanno come origine record, rispettivamente, Tab1, Tab2
e Tab3.
Se queste 3 tabelle sono in relazione uno-a-molti con la tabella che è
origine record del report principale tramite un campo numerico di nome
Codice
Se i campi da sommare delle 3 tabelle si chiamano rispettivamente Imp1,
Imp2, Imp3.
Se il controllo del report principale che deve contenere la somma dei 3
sottoreport si chiama Pippo.
A fronte dell'evento "Su formattazione" del Corpo del report genera un
codice VBA di questo tipo:
Me!Pippo = Nz(DSum("lmp1", "Tab1", "Codice=" & Codice) +_
Nz(DSum("lmp2", "Tab2", "Codice=" & Codice) +_
Nz(DSum("lmp3", "Tab3", "Codice=" & Codice)
_______
Corradi Wilder