Visual Basic para Aplicaciones - Cerrar formularios abiertos

Life is soft - evento anual de software empresarial
 
Vista:

Cerrar formularios abiertos

Publicado por Pablo (77 intervenciones) el 18/01/2018 22:38:53
Tengo una aplicación con la que voy abriendo formularios, pero no siempre son los mismos.

Al finalizar se abre un formulario en el que se da las gracias al usuario y se le dan instrucciones para continuar.

Al hacer clic quiero que se cierren (unload) todos los formularios que se han abierto.

Tengo este código:

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Label1_Click()
 
Dim tal As Object
 
    For Each tal In VBA.UserForms
        Unload tal
    Next
 
'visualizar el boton de enviar a validar
Sheets("Hoja3").Select
Hoja3.CommandButton1.Visible = True
End Sub

Y me da el error "Primero tiene que cerrar el formulario modal superior"

¿Que quiere decir, que los formularios que no están abiertos no se pueden cerrar?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de gilman
Val: 138
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Cerrar formularios abiertos

Publicado por gilman (47 intervenciones) el 19/01/2018 12:29:55
El problema es que primero tienes que descargar las pantallas modales, prueba
1
2
3
4
Dim i As Long
For i = VBA.UserForms.Count To 1 Step -1
    Unload VBA.UserForms(i - 1)
Next i
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Cerrar formularios abiertos

Publicado por Pablo (77 intervenciones) el 19/01/2018 13:13:25
1
2
3
4
5
6
7
Dim i as Long
 
For i = 1 to 1000000
 
   MsgBox "GRACIAS !!"
 
Next i
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar