Cierre de los formularios de usuario abiertos

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

  1. 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
    1. 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