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. domenico laurenza 9,900 Punti di reputazione Moderatore volontario
    2021-11-29T10:54:34+00:00

    Ciao,

    innanzi tutto nella query QShips aggiungi le colonne A B C AA BB CC.

    nella maschera i flags B e C devi impostare la proprietà a tre stati a Sì.

    Nel codici, nell'impostare i filtri devi sempre aggiungere wFiltro a ciascun filtro per concatenarne più di uno

    If Len(Me.CercaTipologia & "") > 0 Then

    wFiltro = **wFiltro** **&** "VesselTypeTesto = " & Chr(34) & Me.CercaTipologia & Chr(34) & " And " 
    

    End If

    If Len(Me.CercaFlag & "") > 0 Then

    wFiltro = **wFiltro &** "Flag = " & Chr(34) & Me.CercaFlag & Chr(34) & " And " 
    

    End If

    Facci sapere

    Mimmo

    La risposta è stata utile?

    0 commenti Nessun commento
  2. Anonimo
    2021-11-29T06:52:23+00:00

    Grazie Carlo ma tramite DropBox non riesco ad aprire il file problema mio.

    ho provveduto a ripulire il DB che sto realizzando per poterlo condividere...

    speriamo che questo non si incasini come quello precedente :)

    TestMulo1.0

    Ivan

    La risposta è stata utile?

    0 commenti Nessun commento
  3. Anonimo
    2021-11-25T20:36:47+00:00

    Il file lo trovi qui leggermente modificato.

    La risposta è stata utile?

    0 commenti Nessun commento
  4. domenico laurenza 9,900 Punti di reputazione Moderatore volontario
    2021-11-25T13:38:18+00:00

    Importa una maschera Alla volta..per capire quella corrotta

    La risposta è stata utile?

    0 commenti Nessun commento