Cierre de los formularios de usuario abiertos
Guillaume
-
jc80 Mensajes publicados 5063 Fecha de registro Estado Miembro Última intervención -
jc80 Mensajes publicados 5063 Fecha de registro Estado Miembro Última intervención -
Hola,
Vuelvo a ponerme en contacto con usted por otro problema.
Me gustaría cerrar todos los userforms abiertos para abrir solo el userform de inicio.
Entonces intenté:
Dim USF As Object
For each USF in userforms
If USF.name.visible = true then USF.name.hide
Next USF
UF_Acceuil.show
Pero no entiendo, en cuanto al If, me expulsan del bucle "for each"
Atentamente,
Guillaume
Configuración: iPhone / Safari 9.0
Vuelvo a ponerme en contacto con usted por otro problema.
Me gustaría cerrar todos los userforms abiertos para abrir solo el userform de inicio.
Entonces intenté:
Dim USF As Object
For each USF in userforms
If USF.name.visible = true then USF.name.hide
Next USF
UF_Acceuil.show
Pero no entiendo, en cuanto al If, me expulsan del bucle "for each"
Atentamente,
Guillaume
Configuración: iPhone / Safari 9.0
2 respuestas
-
Hola, probé tu código, efectivamente no funciona, no sé por qué. Al poner solo
USF.visible
en lugar deusf.name.visible
funciona.
Supongo que Excel no encuentra tus userforms porque los has renombrado de manera diferente a userform1, userform2, ...
--
¡Los foreros no son adivinos, al menos yo no! -
Hola
A continuación un código para un botón
1° propiedad Cmdfermer
2° nombre Cerrar
Private Sub Cmdfermer_Click()
Unload Me
End Sub
