Newsgroup: it.comp.appl.access
Titolo: Non riesco ad azzerare un campo calcolato.

Buongiorno a tutti.
Ho una combinata che lavora su una query.
In pratica scegliendo una ditta, la combo mi visualizza
Ditta, A.Q., Valore 2009, Valore 2010.consumato,(sommatoria degli
stessi interventi di quell'A.Q.)
questi valori vengono assegnati a delle celle con istruzioni tipo :
'dopo aggiornamento combinata valorizza campi
Me.DITTA.Value = Me.CasellaCombinata174.Column(0)
Me.NumeroFornitore.Value = Me.CasellaCombinata174.Column(4)
Me.scadenza_contratto.Value = Me.CasellaCombinata174.Column(2)
Me.valore2009.Value = Me.CasellaCombinata174.Column(7)
Me.valore2010.Value = Me.CasellaCombinata174.Column(8)
Me.consumato.Value = Me.CasellaCombinata174.Column(6)
Ci sono poi due caselle di testo:
testo 213 con istruzione  =[valore2009]-[consumato]
testo 215 con istruzione  =[valore2010]-[consumato]
Non se se è corretto però fino qui tutto funziona perfettamente,
semprechè ci siano valori nei campi.
Purtroppo alcune ditte non hanno valorizzato il campo A.Q., in questo
caso il valore è "no A.Q."
In concomitanza con l'aggiornamento della combo, ho impostato questa
istruzione,  che però non riesco a far funzionare:
'se non c'è accordo quadro svuota campi conteggio AQ
If Me.ACCORDOQUADRO = "no A.Q." Then
Me.consumato = " "
Me.Testo213.Value = " "
Me.Testo215.Value = " "
end if
ovvero funziona perfettamente per il campo consumato ma non per
testo213 e testo215 dandomi errore "tipo non corrispondente". Il
formato delle celle è identico a consumato.
grazie infinite a chi potrà aiutarmi.

 ha scritto nel messaggio 
news:bd3deeb9-f87d-4ba5...@z41g2000yqz.googlegroups.com...
Buongiorno a tutti.
Ho una combinata che lavora su una query.
In pratica scegliendo una ditta, la combo mi visualizza
Ditta, A.Q., Valore 2009, Valore 2010.consumato,(sommatoria degli
stessi interventi di quell'A.Q.)
questi valori vengono assegnati a delle celle con istruzioni tipo :
'dopo aggiornamento combinata valorizza campi
Me.DITTA.Value = Me.CasellaCombinata174.Column(0)
Me.NumeroFornitore.Value = Me.CasellaCombinata174.Column(4)
Me.scadenza_contratto.Value = Me.CasellaCombinata174.Column(2)
Me.valore2009.Value = Me.CasellaCombinata174.Column(7)
Me.valore2010.Value = Me.CasellaCombinata174.Column(8)
Me.consumato.Value = Me.CasellaCombinata174.Column(6)
---------------------------------------------------------
questi ultimi tre li modificherei cos�:
Me.valore2009.Value = nz(Me.CasellaCombinata174.Column(7),0)
Me.valore2010.Value = nz(Me.CasellaCombinata174.Column(8),0)
Me.consumato.Value = nz(Me.CasellaCombinata174.Column(6),0)
Ci sono poi due caselle di testo:
testo 213 con istruzione  =[valore2009]-[consumato]
testo 215 con istruzione  =[valore2010]-[consumato]
Non se se � corretto per� fino qui tutto funziona perfettamente,
semprech� ci siano valori nei campi.
Purtroppo alcune ditte non hanno valorizzato il campo A.Q., in questo
caso il valore � "no A.Q."
In concomitanza con l'aggiornamento della combo, ho impostato questa
istruzione,  che per� non riesco a far funzionare:
'se non c'� accordo quadro svuota campi conteggio AQ
If Me.ACCORDOQUADRO = "no A.Q." Then
Me.consumato = " "
Me.Testo213.Value = " "
Me.Testo215.Value = " "
end if
---------------------------------------------
Con le modifiche di sopra dovrebbe andare tutto a posto...comunque puoi 
sostituire lo spazio " " con uno 0 (zero):
Me.consumato = 0
Probabilmente il controllo ha un tipo di dati numerici e non accetta il 
testo.
ovvero funziona perfettamente per il campo consumato ma non per
testo213 e testo215 dandomi errore "tipo non corrispondente". Il
formato delle celle � identico a consumato.
grazie infinite a chi potr� aiutarmi.
Ciao, Carlo 

 Ciao, Carlo
grazie Carlo domattina provo immediatamente...
Ho messo spazio per lasciare le celle vuote, eventualmente se funziona
potrei mettergli un istruzione che se è = a zero non visualizzi, ma mi
sembra di andarmi a incasinare. Appena provo ti faccio sapere, grazie
infinite ciao,

 infinite ciao,
Al posto dello spazio puoi anche provare a metterci un null ( = Null)
Ciao.
-Marco-
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 - Mostra testo citato -
Ciao, grazie per l'aiuto ma ancora non funziona.
ancora grazie se mi potrai aiutare..
Maurizio

 > > > testo 213 con istruzione  =[valore2009]-[consumato]
Semplifica, prova a risolvere con una singola formula, senza VBA:
=iif([ACCORDOQUADRO]="AQ";nz([valore2009];0)-nz([consumato];0);null)
Ciao.
-Marco-
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
