Buscar por Fila y Columna en control ListBox

Поділитися
Вставка
  • Опубліковано 20 січ 2025

КОМЕНТАРІ • 7

  • @franciscoborzi6354
    @franciscoborzi6354 2 роки тому +1

    Muy bueno, muchas gracias. Saludos

  • @ingjuanpablofrancolozada6303
    @ingjuanpablofrancolozada6303 2 роки тому

    un Maestro de excel un saludo amigo Desde Colombia.

    • @EcoDev-Solutions
      @EcoDev-Solutions  2 роки тому

      Gracias a ti por tu constante apoyo al canal y comentarios animadores.
      Mis respetos desde Venezuela!

  • @danng1857
    @danng1857 Рік тому

    Saludos. Y como seria con 3 condiciones para este caso? y epecificando algunas columnas.

    • @EcoDev-Solutions
      @EcoDev-Solutions  Рік тому

      Hola
      Solo anida mas condiciones y especificando el índice de las columnas:
      If Criterio1=ListBox1.List(F,1) And Criterio2=ListBox1.List(F,2) And Criterio3=ListBox1.List(F,3) Then
      Msgbox"Lo encontraste"
      End If

  • @EcoDev-Solutions
    @EcoDev-Solutions  2 роки тому +1

    Código de búsqueda :
    Dim F As Single, C As Single
    Me.LblFila.Caption = ""
    Me.LblColumna.Caption = ""
    Me.ListBox1.ListIndex = -1
    For C = 0 To 9
    For F = 0 To Me.ListBox1.ListCount - 1

    If InStr(1, Me.ListBox1.List(F, C), Me.TxtSearch.Text, vbTextCompare) Then

    Me.ListBox1.ListIndex = F
    Me.LblFila.Caption = "Fila N° " & F + 1
    Me.LblColumna.Caption = "Columna N°" & C + 1
    Exit Sub
    End If

    Next F
    Next C