Como mostrar en una etiqueta cuantos regisros tengo en un combobox

Quisiera de su ayuda para replicar

Esto en mi formulario

Tengo mi combobox que se filtra según lo que capture en un textbox

Y requiero que en una etiqueta diga Operador 1 de tantos

Y si elijo otro operador de los que estén en la lista se actaulice el contador

Es decir

Operador 1 de 7

Operador 2 de 7 etc

1

1 Respuesta

4.654.675 pts. Sancho, si los perros ladran ...

Después de cargar tu combobox según el filtro debes agregar una línea como esta:

 Label1.Caption = "Resgistro 0 de " & ComboBox1. ListCount

Y para cuando selecciones un operador del combo, entonces pon el siguiente evento:

Private Sub ComboBox1_Change()
    n = ComboBox1.ListIndex + 1
    Label1.Caption = "Resgistro " & n & " de " & ComboBox1.ListCount
End Sub

'.[ No olvides valorar la respuesta. 
'.[Avísame cualquier duda

Hola dante

Con base al formulario que me estas apoyando como seria la adaptación, ya que como recordara en el evento de l combobox tengo este código

Captura.Camioneta = ""
With Worksheets("Catálogos").Range("O2:R34")
Set c = .Find(Cmbx_Operador.Value, lookat:=xlWhole)
If Not c Is Nothing Then
Captura.Camioneta = c.Offset(0, 3)
Else
MsgBox "No se encuentra el Operador en el Catálogo"
End If
End With

¿O te envío de nuevo el archivo?

Solo una duda cuando ingreso la línea dentro del combobox

No se actualiza el contador

Solo aparece registro 0 de 6

Si selecciono otro que esta dentro de la lista no avanza

 n = ComboBox1.ListIndex + 1
    Label1.Caption = "Resgistro " & n & " de " & ComboBox1.ListCount

Pero lo pusiste en este evento:

Private Sub ComboBox1_Change()

Si lo puse en el evento change

ya quedo tenia error de un espacio y por eso no daba 

muchas gracias dante excelente ayuda como siempre

Saludos 

 PD cierro pregunta y espero me puedas ayudar en otra pregunta que tengo

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas