Mostrar número de combobox no vacías
Resuelto
tav2014
Mensajes publicados
3
Estado
Miembro
-
Patrice33740 Mensajes publicados 8400 Fecha de registro Estado Miembro Última intervención -
Patrice33740 Mensajes publicados 8400 Fecha de registro Estado Miembro Última intervención -
Hola a todos
Principiante en VBA, he creado un UserForm compuesto por Combobox numeradas del 1 al 20
Al completar el UserForm me gustaría mostrar en un textbox el número de combobox no rellenadas, pero solo para aquellas numeradas entre 8 y 17.
Gracias de antemano
Principiante en VBA, he creado un UserForm compuesto por Combobox numeradas del 1 al 20
Al completar el UserForm me gustaría mostrar en un textbox el número de combobox no rellenadas, pero solo para aquellas numeradas entre 8 y 17.
Gracias de antemano
3 respuestas
-
Hola,
Todas las bases aquí:
https://silkyroad.developpez.com/VBA/ControlesUserForm/
y aquí:
https://silkyroad.developpez.com/VBA/UserForm/
--
Cordialement
Patrice -
Muchas gracias por esta respuesta rápida, sin embargo no he encontrado solución a mi problema.
He encontrado una solución para contar todos los combobox de mi userform pero no logro adaptar este procedimiento solo al rango de los combobox de 8 a 17.
Sub cuenta_los_Combobox_llenos(usf As Object)
Dim Ctrl As Control
Dim i As Byte
For Each Ctrl In usf.Controls
If TypeName(Ctrl) = "ComboBox" Then
If Ctrl.Value <> "" Then i = i + 1
End If
Next
UserForm3.TextBox132 = i
End Sub
Gracias por vuestra ayuda -
Al final logré obtener mi resultado de la siguiente manera
Dim Ctrl As Control
Dim i As Byte
For nb = 8 To 22
If Me("Combobox" & nb).Value <> "" Then i = i + 1
Next
MsgBox ("i")
End Sub
gracias
