none
Semplice funzione di ricerca

    Domanda

  • Ciao Ragazzi,

    uso Visual Basic da pochissimo e ne so davvero poco. Voglio creare una semplice funzione di ricerca o di filtraggio di una tabella.La tabella è questa

    id nome cognome
    E2A30 fa ge
    E2A42 he hr
    E2A43 gw tg
    E2B45 jy fw
    E2A45 wf hg
    E2B62 ht wf

    e il codice che ho usato è questo:

    Private Sub TextBox1_Change()

    End Sub


    Private Sub CommandButton1_Click()
        Range("A7:C7").Select
        Selection.AutoFilter
        ActiveSheet.Range("$A$7:$C$9").AutoFilter Field:=1, Criteria1:=TextBox1
    End Sub

    Ho poi assegnato la macro ad un pulsante che apre la finestra di dialogo. All'interno della finestra di dialogo inserisco l'ID e la MAcro filta per quell'ID. Vorrei semplicemente aggiungere due funzioni a questa macro:

    1) se inserisco un ID inesistente mi viene visualizzato un messaggio del tipo "ID non trovato"

    2) Migliore la funzione di ricerca. Ad esempio se scrivo solo "E2A" voglio che la tabella venga filtrata per mostrare E2A30, E2A42, E2A43, E2A45. Attualmente, invece, non viene visualizzato nulla.

    Sapete aiutarmi?

    Grazie

    sabato 3 marzo 2018 13:08

Tutte le risposte