Ver originales (Francés)

Cierre de los formularios de usuario abiertos

Guillaume -  
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

2 respuestas

Respuesta 1 / 2
tyranausor Mensajes publicados 3501 Fecha de registro   Estado Miembro Última intervención   2 060
 
Hola, probé tu código, efectivamente no funciona, no sé por qué. Al poner solo 
USF.visible
en lugar de 
usf.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!
0
Respuesta 2 / 2
jc80 Mensajes publicados 5063 Fecha de registro   Estado Miembro Última intervención   1 443
 
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
0