Ricerca noinativo in elenco



  • Ricerca noinativo in elenco
    di alexps81 data: 26/06/2015 11:59:38

    Buongiorno a tutti, oggi vi propongo un quesito riguardo un elenco telefonico realizzato in Excel.

    In pratica mi piacerebbe che ci fosse un pulsante (con il simbolo del binocolo) e al click si apre una UserForm dove compare un TextBox e i PulsantiComandi "OK" e "ANNULLA".
    Nel TextBox si deve scrivere il cognome o nome o numero di telefono e al click su "OK" deve riportarmi all'Elenco Telefonico e mostrarmi il rigo contente i dati richiesti nel TextBox.

    Allego un file come esempio.
    N.B. IL FILE E' PROTETTO DA UNA PASSWORD CHE E' "TELECOMUNICAZIONI"



  • di Raffaele_53 data: 26/06/2015 13:38:55

    @fiore
    Apri il file e posizionati sul foglio, in basso sulla linguetta del foglio, mouse destro e premi "visualizza codice", a destra incolli il codice sotto.
    Con Excel superiore al 2003, devi salvare come XLSM
    Se devi chiedere nuove spiegazioni apri un nuovo post, dal titolo mi sembra di alexps81

    @alexps81
    Appena posso lo vedo.


     
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Then
    Application.EnableEvents = False
    Dim Ur1 As Long
    Ur1 = Range("A" & Rows.Count).End(xlUp).Row
    Cells(Ur1 + 1, 1) = Cells(1, 1)
    Application.EnableEvents = True
    End If
    End Sub



  • di Mauro data: 26/06/2015 14:36:44

    Il file allegato è stato distrutto poichè conteneva dati sensibili.
    Come mai sei in possesso di dati di quel tipo ?
    Ti chiedo gentilmente di rispondermi anche in privato, in caso contrario sarò costretto a segnalarti alle autorità competenti. Tieni conto che anche se hai utilizzato un accesso come utente non iscritto sei comunque rintracciabile.



  • di alfrimpa data: 26/06/2015 15:03:16

    Mauro ti segnalo che nell'altra è presente la stessa discussione con il file ancora in chiaro

    Alfredo





  • di Mauro data: 26/06/2015 15:15:54

    Ok grazie dell'informazione.