Applicare filtri su maschera continua basata su query

Anonimo
2021-11-23T10:25:28+00:00

Win 10

Access 2013

Buongiorno,

il DB è stato realizzato, i dati li inserisco tutti correttamente ma non ci faccio nulla se non riesco ad interrogarlo!

sto provando ad utilizzare una maschera come interfaccia per decidere cosa cercare e tramite un report avere il risultato.

mi sono basato su un tutorial che però non mi filtra la parte "periodo inizio e fine" ma almeno quello sulla Categoria funziona :)

a parte il fatto che la ricerca dovrebbe permettere :

  • ricerca nel periodo;
  • ricerca per categoria;
  • ricerca per nome Assetto;
  • ricerca per categoria nel periodo
  • ricerca per nome Assetto, categoria nel periodo.
  • ricerca se valido;
  • e chi più ne ha più ne metta

provo a condividere quanto fin ora ho cercato di fare, ma mi vergogno dei miei limiti :(

MascheraRicercaQuery

Ivan

Microsoft 365 e Office | Access | Per la casa | Windows

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti Nessun commento
Risposta accettata dall'autore della domanda
Anonimo
2021-11-30T19:52:22+00:00

Qui trovi la soluzione.

La risposta è stata utile?

1 persona ha trovato utile questa risposta.
0 commenti Nessun commento

42 risposte aggiuntive

Ordina per: Più recente
  1. Anonimo
    2021-12-02T09:20:48+00:00

    nooooooooo!!

    che idiota!!! nel mio avevo inserito la stringa che mi hai detto ma quando facevo Cerca continuavo a guardare l'elenco degli eventi ma non guardavo quanto veniva riportato nel conteggio !!!!!

    scusami tanto Mimmo, ti ho assillato a vuoto :(

    grazie ancora

    Ivan

    La risposta è stata utile?

    0 commenti Nessun commento
  2. domenico laurenza 9,900 Punti di reputazione Moderatore volontario
    2021-12-02T09:05:17+00:00

    Ciao,

    modifica la funzione aggiungendo la riga in grassetto

    Function FunContaEventi()

    Dim myRst As Recordset 
    
    Dim myEvento As Long 
    
    Set myRst = Me.RecordsetClone  
    
    FunContaEventi = 0 
    
    Do While Not myRst.EOF  
    
       If myEvento <> myRst("IdEvento") Then 
    
          **myEvento = myRst("IdEvento")**  
    
          FunContaEventi = FunContaEventi + 1  
    
       End If  
    
       myRst.MoveNext  
    
    Loop  
    
    Set myRst = Nothing  
    

    End Function

    Mimmo

    La risposta è stata utile?

    0 commenti Nessun commento
  3. Anonimo
    2021-12-02T07:45:35+00:00

    Mimmo ciao,

    il file che ho condiviso nell'altro post è quello attualmente in uso "Mulo100" mulo perchè sono come di coccio come i muli (detto toscano).

    forse con le immagini riesco meglio a farmi capire:

    se guardi la situazione iniziale senza filtri già si capisce cosa NON va.

    come vedi nel primo rigo ho inserito brutalmente il numero di evento, e si legge 1 1 2 3 3 4 5 5 questo accade perchè per l'evento 1, 3 e 5 ci sono stati due assetti che sono intervenuti sull'evento.

    non mi interessa se vengono visualizzati come adesso, va benissimo così vedo subito tutti gli assetti che sono intervenuti, ma mi serve che il risultato del conteggio degli eventi NON sia 8 come accade adesso (1 1 2 3 3 4 5 5 = 8 eventi contati), ma mi restituisca come valore 5 che è il numero corretto di eventi occorsi.

    allego anche qui il file che sto usando Mulo100

    Mulo100

    Ivan

    La risposta è stata utile?

    0 commenti Nessun commento
  4. domenico laurenza 9,900 Punti di reputazione Moderatore volontario
    2021-12-01T20:37:21+00:00

    Se così funziona, imposta nella query QRicerca l'ordinamento crescente o decrescente (come preferisci) sulla colonna IdEvento

    Mimmo

    La risposta è stata utile?

    0 commenti Nessun commento