Codice per selezionare/contare query

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic


   Ciao il mio db è fatto di una tabella ANAGRAFICA e di una TRATTAMENTI, collegati per mezzo di id
Quello che mi serve fare è delle query che sulla base di un periodo di tempo che imposto in maschera mi selezioni e conti tutti i record che
rispondo a certe carattrisiche, tipo tiolo di studio..quindi conteggio di questo
poi occupazione, quindi conteggio di questo ecc
E per ognuno devo dividere  maschi e le femmine per avre i totali parziali
Ho iniziato a fare le query, 2 per ogni parametro di ricerca
Per esempio per il titolo di studio sono 2 per la possibilità elemtare, (uno maschi e uno femmina)
2 per scuole medie..ecc

Allla fine sono tantissime query
Stavo pensando se esistesse un modo che mi permettese magari col codice vb di selezionare i M e i F durante il conteggio totale secondo un certo parametro
In sostanza per evitare di avere 2 query per ogi parametro
In questo momento ho un codice che prende da una tabella  RIEPILOGO tutti i nomi delle query di selezione, li conta e li assegna 

questo


Dim DBCorrente As DAO.Database
Dim rsRiepilogo As DAO.Recordset
Set DBCorrente = CurrentDb
Set rsRiepilogo = DBCorrente.OpenRecordset("Riepilogo", dbOpenDynaset)
rsRiepilogo.MoveFirst
Do Until rsRiepilogo.EOF
     rsRiepilogo.Edit
     rsRiepilogo!ConteggioQuer = DCount("*", rsRiepilogo!NomeQuery)
     rsRiepilogo.Update
     rsRiepilogo.MoveNext
Loop
rsRiepilogo.Close
DBCorrente.Close

dove Nomequery è il campo dove legge i nomidelle query che io ho gia inserito
sarebbe possibile inserire del codice nel loop che verifica se nella query presa in esame, il campo SESSO si M o F e progressivamente lo sommi ogni volta che trova un occorrenza
qualcosa delgenere
IIf ((Riepilogo.Nomequery.SESSO) = "m"), Totali = "M", Totali = "F" 
da inserire nel loop al posto di conteggioQuerygrazie