Risultati da 1 a 13 di 13

Discussione: macro-per-autocompletamento



  1. #1
    L'avatar di nessi
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Milano
    Età
    53
    Messaggi
    159
    Versione Office
    2013/2016
    Likes ricevuti
    3
    Likes dati
    35

    macro-per-autocompletamento

    ciao A tutti,
    mi ricollego ad una precedente discussione:
    http://www.forumexcel.it/forum/7-dom...ocompletamento

    dove alfrimpa forniva una carinissima soluzione a Lety88.
    allego il file di riferimento.
    quanto mi servirebbe, è che nella sola cella B& del foglio1 mi facesse lo stesso lavoro con le targhe automobilistiche e le province del foglio2.
    selezionando la targa dovrebbe visualizzarmi nella listbox1 sia targa che provincia per poi, cliccando la scelta, riportarmi in B6 la sola sigla della targa automobilistica.

    inutile specificare che ho tentato per ore di modificare il file a mio uso e consumo ... :187:

    grazie mille per l'ennesimo aiuto che vorrete concedermi.
    File Allegati File Allegati

  2. #2

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6795
    Versione Office
    2013
    Likes ricevuti
    718
    Likes dati
    164

    Re: macro-per-autocompletamento

    Ciao nessi

    Poiché mi sento tirato in causa ti allego il file modificato secondo, a quel che ho capito, le tue esigenze.

    Fai sapere se era questo che volevi.

    Alfredo
    File Allegati File Allegati

  3. #3

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6795
    Versione Office
    2013
    Likes ricevuti
    718
    Likes dati
    164

    Re: macro-per-autocompletamento

    Nell'indecisione, qualora volessi nella tendina le targhe, ti allego altro file.

    Alfredo
    File Allegati File Allegati

  4. #4
    L'avatar di nessi
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Milano
    Età
    53
    Messaggi
    159
    Versione Office
    2013/2016
    Likes ricevuti
    3
    Likes dati
    35

    Re: macro-per-autocompletamento

    Ciao Alfredo, un po' ci speravo che ti sentissi tirato in causa :167:
    grazie mille, davvero, il secondo file è quello che mi serviva. dettaglietto su cui però posso cercare di lavorarci in autonomia: nella listbox oltre che la targa, mi piacerebbe moltissimo che comparisse anche il nome della provincia.
    se non riesco da solo ... magari ti disturbo di nuovo.
    grazie!

    Camillo.

  5. #5

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6795
    Versione Office
    2013
    Likes ricevuti
    718
    Likes dati
    164

    Re: macro-per-autocompletamento

    Ciao Camillo

    Ci sto provando ma non è, almeno per me, cosa da poco ma ci vorrei arrivare da solo per vincere una sfida con me stesso ed imparare cose nuove.

    Qualche ideuzza ce l'ho; dammi un po' di tempo e ci risentiamo.

    Alfredo

  6. #6

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2808
    Versione Office
    Excel 2013
    Likes ricevuti
    1020
    Likes dati
    979

    Re: macro-per-autocompletamento

    Se ho capito bene, queste sono le modifiche:
    Codice: 
    Option Explicit
    
    
    Option Compare Text
    
    
    Private sh As Worksheet
    
    
    Private Sub ListBox1_Click()
    ActiveCell.Value = UserForm1.ListBox1.Value
    UserForm1.ListBox1.Visible = False
    UserForm1.TextBox1.Value = ""
    UserForm1.Hide
    End Sub
    
    
    Private Sub TextBox1_Change()
    UserForm1.ListBox1.Visible = True
    UserForm1.ListBox1.ColumnCount = 2
    Call mCaricaListBox("FiltraDati")
    End Sub
    
    
    Private Sub UserForm_Initialize()
        Set sh = ThisWorkbook.Worksheets("Foglio2")
        
        UserForm1.ListBox1.Visible = False
        UserForm1.ListBox1.ColumnCount = 2
        Call mCaricaListBox("CaricaDati")
    End Sub
    
    
    
    
    Private Sub mCaricaListBox(ByVal s As String)
    
    
        Dim lRiga As Long
        Dim lng As Long
        
        With sh
            lRiga = .Range("b" & .Rows.Count).End(xlUp).Row
        End With
        
        With Me.ListBox1
            If s = "CaricaDati" Then
                For lng = 1 To lRiga
                    .AddItem (sh.Range("a" & lng).Value)
                    .Column(1, .ListCount - 1) = sh.Range("b" & lng).Value
                Next
            ElseIf s = "FiltraDati" Then
                .Clear
                For lng = 2 To lRiga
                    If Left(sh.Range("a" & lng).Value, Len(Me.TextBox1.Text)) = Me.TextBox1.Text Then
                        .AddItem sh.Range("a" & lng).Value
                        .Column(1, .ListCount - 1) = sh.Range("b" & lng).Value
                    End If
                Next
            End If
        End With
        
    End Sub
    
    
    
    
    Private Sub UserForm_Terminate()
        Set sh = Nothing
    End Sub

  7. #7

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6795
    Versione Office
    2013
    Likes ricevuti
    718
    Likes dati
    164

    Re: macro-per-autocompletamento

    Peccato.... ci volevo arrivare da solo :188:

    Alfredo

  8. #8

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2808
    Versione Office
    Excel 2013
    Likes ricevuti
    1020
    Likes dati
    979

    Re: macro-per-autocompletamento

    Ops. :280:

  9. #9

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6795
    Versione Office
    2013
    Likes ricevuti
    718
    Likes dati
    164

    Re: macro-per-autocompletamento

    Ma no Rubik ci mancherebbe che tu debba scusarti.

    Questo è un forum pubblico e chiunque può intervenire qualora lo ritenga.

    Il problema è il mio nel senso che se arrivo ad una soluzione da solo imparo e non dimentico (non dico più ma non tanto facilmente) quello che ho appreso; se, invece, leggo una soluzione postata da altri (ammesso che la capisca) dopo poco non la ricordo più.

    Un caro saluto e complimenti per la tua bravura.

    Alfredo

  10. #10
    L'avatar di nessi
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Milano
    Età
    53
    Messaggi
    159
    Versione Office
    2013/2016
    Likes ricevuti
    3
    Likes dati
    35

    Re: macro-per-autocompletamento

    :258: concedetemi un sorriso a pieni denti perché la penso anch'io come Alfredo.
    però confesso che non ci stavo arrivando. quindi ringrazio Rubik per l'aiuto come sempre risolutivo.
    tra l'altro indicare il numero di colonne è obbligatorio. mi sono perso sul columcount. ditemi voi se è possibile ...
    grazie mille!

  11. #11
    L'avatar di nessi
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Milano
    Età
    53
    Messaggi
    159
    Versione Office
    2013/2016
    Likes ricevuti
    3
    Likes dati
    35

    Re: macro-per-autocompletamento

    per i posteri il file aggiornato e definitivo :97:
    File Allegati File Allegati

  12. #12

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6795
    Versione Office
    2013
    Likes ricevuti
    718
    Likes dati
    164

    Re: macro-per-autocompletamento

    Ciao Camillo

    Solo un'ultima cosa, un'inezia

    Nella Listbox imposterei la proprietà ColumnWidths a 20 e 50 (tra 20 e 50 devi mettere ";") così targa e provincia sono vicine ed esteticamente va meglio.

    E poi devi cambiare la Caption della userform perché nel tuo caso non può essere "Ragione sociale".

    Alfredo

  13. I seguenti utenti hanno dato un "Like"


  14. #13
    L'avatar di nessi
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Milano
    Età
    53
    Messaggi
    159
    Versione Office
    2013/2016
    Likes ricevuti
    3
    Likes dati
    35

    Re: macro-per-autocompletamento

    Grazie Alfredo! è vero, non ci avevo fatto caso.
    Molto gentile.
    grazie ancora. a tutti.

Discussioni Simili

  1. [Risolto] Creare elenco di strade con autocompletamento
    Di angar2002 nel forum Domande su Excel in generale
    Risposte: 11
    Ultimo Messaggio: 13/03/17, 16:55
  2. Autocompletamento ComboBox
    Di alfrimpa nel forum Domande su Excel VBA e MACRO
    Risposte: 29
    Ultimo Messaggio: 01/05/16, 23:38
  3. Macro per autocompletamento
    Di Lety88 nel forum Domande su Excel VBA e MACRO
    Risposte: 9
    Ultimo Messaggio: 20/04/16, 18:42
  4. Ancora autocompletamento su combobox
    Di insolente nel forum Domande su Excel in generale
    Risposte: 11
    Ultimo Messaggio: 20/02/16, 21:47

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •