Ricerca di numeri in textbox

Anonimo
2021-03-14T11:35:39+00:00

Buon giorno a tutti.

Ho trovato un tutorial che spiegava come creare una TextBox per il filtro di ricerca in un foglio Excel, funziona bene con il testo ma non con i numeri.

Come posso modificare il codice VBA per far si che funzioni anche con quelli ?


Private Sub Frequenza_Change()
Range("A19").AutoFilter field:=1, Criteria1:=Frequenza.Text & "*"
If Frequenza.Text = "" Then
Selection.AutoFilter
End If

End Sub

Così com'è, ho visto che, per far riconoscere un testo parziale, devo utilizzare il carattere jolly "*", è possibile evitare l'asterisco e far si che automaticamente mi faccia la ricerca anche se con pochi caratteri ?

Su questo foglio lavoreranno colleghi che sanno a mala pena aprire un foglio Excel, figuriamoci fargli capire ed accettare di utilizzare il carattere jolly per le ricerche.

Grazie anticipatamente per le risposte.

Microsoft 365 e Office | Excel | 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

16 risposte

Ordina per: Più utili
  1. Anonimo
    2021-03-16T18:58:57+00:00

    Così funziona bene la seconda TextBox, peccato per la ricerca numerica parziale, tra le due è quella che avremmo utilizzato di più.

    Grazie

    La risposta è stata utile?

    0 commenti Nessun commento
  2. Anonimo
    2021-03-16T18:28:42+00:00

    Ciao Max,

    Scusami Norman ma non avevo capito che bisognava inserire per intero il numero, se lo digito funziona correttamente come stai mostrando tu.

    L'inserimento dell'intera stringa numerica è necessario perché VBA utilizza il separatore delle migliaia e il separatore decimale degli Stati Uniti, mentre il tuo foglio di lavoro utilizza i corrispondenti separatori italiani

    Nel codice del secondo TextBox, sostituisce l'istruzione

        vVal = Descrizione.Text & "*"

    con:

          vVal = "*" & Descrizione.Text & "*"

    ===

    Regards,

    Norman

    La risposta è stata utile?

    0 commenti Nessun commento
  3. Anonimo
    2021-03-16T18:04:22+00:00

    Scusami Norman ma non avevo capito che bisognava inserire per intero il numero, se lo digito funziona correttamente come stai mostrando tu.

    La ricerca per testo ignora però il carattere jolly e tiene conto solo di quelli che iniziano per la lettera che ho inserito, se vorrò cercare tutto quello che avrà all'interno "Milano" dovrò digitare *milano.

    Sarebbe possibile modificare il primo e fare in modo che, man mano che digito i numeri, parzializzi la visualizzazione dei record ?

    Grazie

    La risposta è stata utile?

    0 commenti Nessun commento
  4. Anonimo
    2021-03-16T17:43:57+00:00

    Grazie Norman ma sia il tuo file che il codice inserito nel mio, si comportano nello stesso identico modo, appena inserisco un numero nel primo TextBox, scompare tutto ed il secondo non tiene conto del carattere jolly in automatico.

    A me, se inserisco un numero, ad esempio 430.800,0 nel primo TextBox, ottengo un'estrazione filtrata di 4 record :

    Se poi inserisco il singolo carattere p nel secondo TextBox viene estratto solo 1 record:

    ===

    Regards,

    Norman

    La risposta è stata utile?

    0 commenti Nessun commento
  5. Anonimo
    2021-03-16T17:29:13+00:00

    Grazie Norman ma sia il tuo file che il codice inserito nel mio, si comportano nello stesso identico modo, appena inserisco un numero nel primo TextBox, scompare tutto ed il secondo non tiene conto del carattere jolly in automatico.

    La risposta è stata utile?

    0 commenti Nessun commento