Ventanas temporizadas

Usan un userfrom y lee en el AYUDA del editor de VBA sobre application
ontime

Abraham

hola, Leonardo !

Como puedo hacer para que en una aplicacion VBA, aparezca una ventana dando un mensaje
pero que el cierre de esa ventana no sea esperando una accion del usuario
sino ya sea una temporizacion o el cumplimiento de una accion específica dentro de mi rutina.
Algo asi como uno de esos anuncios "espere mientras se cargan los archivos en memoria"
que desaparecen sin accion del usuario.

op1: prueba inicialmente con un ejemplo +/- como el siguiente:

1) usa un userform con SOLO un control 'label' informando al usuario que tenga un poquitin de paciencia

2) copia/pega lo siguiente en el modulo de codigo del formulario:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Cancel = CloseMode = vbFormControlMenu
End Sub

3) muestra el formulario de forma 'no modal' justo antes de iniciar algun proceso 'laarrrgo'
realiza tus acciones, y al finalizar, ocultas el formulario +/- como sigue:
-> un procedimiento 'norma' en un modulo de codigo 'estandar' usando un 'lapso de espera' de 15 segundos

Sub Un_poceso_largo()
UserForm1.Show vbModeless
Application.Wait Now + TimeValue("0:00:15")
Unload UserForm1
End Sub

[seguramente] saldran algunos 'imponderables' y/o 'detalles' [de esos que se quedaron en el tintero]

op2: adapta/modifica/... ejemplos como los que encontraras en las siguientes paginas:

a) podrias usar [p.e.] la barra de estado de la aplicacion [por un modulo de clase]...
en la pagina de John Walkenbach, puedes descargar un ejemplo en:
http://j-walk.com/ss/excel/files/progressbar.exe
b) o por otro tipo de objetos [formularios], prueba con los siguientes enlaces:
en la pagina de John Walkenbach, descargas un ejemplo en:
http://j-walk.com/ss/excel/files/progind.exe
en la pagina de Ole P. Erlandsen, descargas [dos] ejemplos en
1) http://www.erlandsendata.no/downloa...ontrol.zip
2) http://www.erlandsendata.no/downloa...amples.zip
otro ejemplo de XL-Logic en: http://www.xl-logic.com/xl_files/vb...e_wait.zip
otro mas en la pagina de Chip Pearson: http://www.cpearson.com/excel/Progress.htm
c) Microsoft KB: XL Como Mostrar un Barra Progreso con un Formulario de Usuario
[basado en la tecnica de John Walkenbach] http://support.microsoft.com/kb/211736/

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.