none
ListBox no selecciona uno de los valores del resultado RRS feed

  • Pregunta

  • Hola Buen Dia:

    Tengo una duda sobre un formulario en el cual por medio de un TextBox hago una búsqueda y el resultado de la misma me aparece en un listbox, cuando yo doy click en uno de los resultados debería seleccionarse la linea donde se encuentra ese resultado en la hoja, y lo hace con todos pero uno de ellos cuando lo selecciono no lo toma si no uno repetido si alguien me pudiera ayudar pongo parte del código que estoy utilizando.

    'Activar la celda del registro elegido
    Private Sub ListBox1_Click()

    Range("a2").Activate
    Cuenta = Me.ListBox1.ListCount - 1
    Set rango = Range("A1").CurrentRegion
    For i = 0 To Cuenta - 1
        If Me.ListBox1.Selected(i) Then
            Valor = Me.ListBox1.List(i)
            rango.Find(What:=Valor, LookAt:=xlWhole, After:=ActiveCell).Activate
        End If
    Next i
    End Sub

    miércoles, 16 de enero de 2019 14:46