[Access] Filtrare parte di un campo

Question

Buon giorno.

Ho bisogno di un aiuto: sto migliorando un programma in Access 2002  per la gestione delle distinte base e mi sono arenato su come compilare in Visual Basic un tipo di filtro.

In una tabella contenente un numero rilevante di righe tra cui il campo “numero_macchina”, vorrei filtrare parte del campo.

Il campo “numero macchina” può contenere ad esempio i seguenti dati: “1” ; “2-3” ; “1-2” ; “3-4” ; “1-3-4” ecc.

Vorrei inserire una casella di testo (num_macc) dove ad esempio digito il valore 1 e, cliccando un bottone (filtra numero macchina), vorrei che nella tabella sottostante mi comparissero solo i campi all’interno dei quali compare appunto il numero 1, in questo caso “1”;”1-2”;”1-3-4”.

Ringrazio sin da subito chi volesse aiutarmi.

Buon giorno.

R.A.

Answer 1

Ciao Red09,

prova così:

Private Sub Pls_filtra_num_mac_Click()

If IsNull(Me!Filtra_num_mac) Then

    MsgBox "INSERIRE NUMERO MACCHINA", vbExclamation, "Richiesta annullata"

Else

    Me.Filter = "[Numero\_Macchina] LIKE '\*" & Me!Filtra\_num\_mac & "\*'"

    Me.FilterOn = True

    Me.OrderBy = "Livello"

    Me.OrderByOn = True

End If

End Sub

---

Cinzia

---

Sito RIO

Il mio Blog

Answer 2

Finalmente funziona!

Ti ringrazio per l'attenzione e l'aiuto che mi hai dato. 

Ciao.

R.A.

Answer 3

Grazie per avermi risposto in brevissimo tempo.

Io però non sono esperto in programmazione Visula Basic e lavoro per tentativi.

Di seguito riporto ciò che ho provato a scrivere senza ottenere risultato.

Private Sub Pls_filtra_num_mac_Click()

 If IsNull(Me!Filtra_num_mac) Then

MsgBox "INSERIRE NUMERO MACCHINA", vbExclamation, "Richiesta annullata"

Else

Me.Filter = "Numero_Macchina LIKE" & Me!Filtra_num_mac

Me.FilterOn = True

Me.OrderBy = "Livello"

Me.OrderByOn = True

End If

End Sub

L’errore che compare digitando un numero e cliccando poi sul tasto è: Errore di run time ‘2448’ – Impossibile assegnare un valore all’oggetto.

Non so dove sbaglio.

Ringrazio per l’aiuto.

R.A.

Answer 4

Ciao R.A.

per filtrare un campo come nel tuo esempio la sintassi da usare per il filtro è [NomeCampo] Like "1*", attenzione però che se ci fosse un numero macchina "11-23" troverebbe anche quello.

---

Cinzia

---

Sito RIO

Il mio Blog