Newsgroup: it.comp.appl.access
Titolo: [RIPROVO] Cambiare Formule e Criteri nelle Query da VBA

Vorrei evitare di fare diverse decine di Query, che
appesantirebbero molto il DB ma una soltanto che soddisfi tutte le
condizioni impostate sulla Maschera1. Perciň vi spiego il mio problema:
supponiamo di avere una "Maschera1" di ricerca basata su una query "Query1".
Sulla Maschera1 ho tre caselle combinate la prima "Combo1" in cui la scelta
č tra "somma" e "media"; nella seconda "Combo2" la scelta č tra "criterioA"
e "criterioB"; nella terza "Combo3" la scelta č tra "campi A,B,C" e "campi
X,Y,Z" (basati sulla stessa tabella).
E' possibile, tramite VBA :
A) cambiare nella Query1 la formula, (quando sulla Maschera1, Combo1 č
selezionato
"somma" o "media") in maniera che mi dia il totale o la media ?
B) cambiare nella Query1 i criteri, (quando sulla Maschera1, Combo2 č
selezionato
"criterioA" o "criterioB") in modo che la query mi restituisca i
valori in base a criterioA o criterioB ?
C) (e qui la sparo grossa) cambiare i campi nella Query1 (quando sulla
Maschera1, Combo3 č selezionato "campi A,B,C" oppure "campi X,Y,Z") ?.
Chiederei anche solo una soluzione ai tre quesiti se gli altri non sono
possibili. Spero di essere stato chiaro. Grazie a chi mi mette almeno sulla
strada giusta (al resto poi cerco di farcela io).
Se non sono stato chiaro contattatemi anche in privato.
Grazie a chi mi aveva giŕ risposto ma non ho risolto il problema.

 Grazie a chi mi aveva già risposto ma non ho risolto il problema.
Grazie a te, solo che vorrei aiutarti, magari prova con un esempio piu' ...
concreto. Magari anche qualcun'altro si butta in un tentativo si
soluzione.Ciao.Luca.

 wrote in message
isPS6.362$%m1.1...@news.infostrada.it...

Scusate se mi intrometto, penso di avere un problema simile che mi ha
bloccato tutto:
uno stralcio della mia query č questo ...
SELECT operaio.o_id_operaio, operaio.o_km,somma_ore.tot_km,
somma_ore.capitolo,
[tot_km]*[o_km]+[arrotondamento] AS tot_costo_km
FROM somma_ore
INNER JOIN operaio ON somma_ore.oper = operaio.o_id_operaio;
praticamente devo tirare su per diversi Capitoli di bilancio il costo delle
missioni in auto. Andrebbe tutto bene se non fosse per l'arrotondamento, il
numerino che arrotonda infatti non č calcolabile, deve essere aggiunto
manualmente ma non come ho fatto io per tutti i capitoli ma solo per quello
scelto di volta in volta. La riga quindi
[tot_km]*[o_km]+[arrotondamento] AS tot_costo_km
deve essere solo
[tot_km]*[o_km] AS tot_costo_km
tranne che per un capitolo scelto (magari anche brutalmente con [Digita
Capitolo:]) a cui va aggiunto l'arrotondamento
Ho provato a fate una cosa del genere nel campo calcolato tot_costo_km
tot_costo_km: arrotonda_km([capitolo],[Digita Capitolo:],[Arrotondamento
forzato:], [tot_km], [o_km])
dove [Digita Capitolo:] e [Arrotondamento Forzato:] vengono inseriti
manualmente e gli altri recuperati dai campi della Query
con una funzioncina che tramite un IF dovrebbe restituire il valore voluto,
ma il risultato č "Errore di Sintassi nell'espressione"
LO SO! HO SBAGLIATO QUALCOSA CHE NEMMENO UN BAMBINO SBAGLIEREBBE, MA COSA?
Forse non sono riuscito a spiegarmi, per favore potete darmi una mano?
Emanuele


Potrebbe essere la [digita capitolo:] o [arrotondamento forzato:]
magari i due punti : gli danno fastidio, prova a toglierli, magari l'errore
sparisce, io non ho mai messo dei segni di punteggiatura nei parametri o nei
nomi dei campi, onde evitare problematiche legate alle espressioni
successive.  Come sarebbe poi la Funzioncian IF ??? prova  a postarla che
magari qualcuno ci dà un'cchiata. Ciao. Luca.