Non riesco ad azzerare un campo calcolato.

[ignazio.pilone]

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.

[Carlo Costarella]

"ignazio.pilone" <ignazio...@gmail.com> 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

[ignazio.pilone]

On 25 Nov, 19:04, "Carlo Costarella" <carlocoslib...@libero.it> wrote:
> "ignazio.pilone" <ignazio.pil...@gmail.com> ha scritto nel messaggionews: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

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,

[Marco Pizzamiglio]

ignazio.pilone ha scritto:

> On 25 Nov, 19:04, "Carlo Costarella" <carlocoslib...@libero.it> wrote:
> > "ignazio.pilone" <ignazio.pil...@gmail.com> ha scritto nel
messaggionews: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

> 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,

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

[ignazio.pilone]

On 26 Nov, 08:42, marco.pizzamig...@gmail.com (Marco Pizzamiglio)
wrote:

> ignazio.pilone ha scritto:
>
> > On 25 Nov, 19:04, "Carlo Costarella" <carlocoslib...@libero.it> wrote:
> > > "ignazio.pilone" <ignazio.pil...@gmail.com> ha scritto nel
>
> messaggionews: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
> > 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,
>
> Al posto dello spazio puoi anche provare a metterci un null ( = Null)
> Ciao.
> -Marco-
>
> --
>

> questo articolo e` stato inviato via web dal servizio gratuitohttp://www.newsland.it/newssegnala gli abusi ad ab...@newsland.it- Nascondi testo citato
>
> - Mostra testo citato -

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

[Marco Pizzamiglio]

ignazio.pilone ha scritto:

[cut]

> > > > 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