Tiempo de Espera

hola seria tan amable de mandar el ejemplito puede ser de utilidad para mien
el futuro gracias

Hola Daniel:
El ejemplito esta subido al foro, únicamente que tendrías que configurar el
Outlook Express para acceder al foro y descargarte el archivo. Me he dado
cuenta de que ahora, los que accedéis a través del Internet Explorer no
podéis detectar la presencia de ficheros adjuntos. De todas formas si me
mandas tu dirección de correo te lo enviare sin ningún
problema.
Un saludo.

"Daniel" escribió en el mensaje
news:

hola seria tan amable de mandar el ejemplito puede ser de utilidad para

mien

el futuro gracias

Gracias mi cuenta de email es muy amable

Prueba lo siguiente

Sub Esperar()

Espera = "0:00:3"
Application.Wait(Now + TimeValue(Espera))

End Sub

esto hara una espera de 3 segundos, cambia el tiempo de espera a tu antojo .
Saludos

"Alex V" escribió en el mensaje
news:9b0201c4d621$7be7cc30$
Hola a todos, necesito que al abrir un archivo me
pregunte si quiero actualizar o no un proceso, pero si no
recibe respuesta en 10 segundos lo ejecute en automático.
¿Alguien tendrá por ahi un ejemplo?

Gracias de antemano.

hola, Jose !

Alex V escribio en el mensaje ...
... que al abrir un archivo me pregunte si quiero actualizar o no un proceso
... si no recibe respuesta en 10 segundos lo ejecute en automatico.
¿Alguien tendra por ahi un ejemplo?

Jose escribio en el mensaje ...
Prueba lo siguiente
Sub Esperar()
Espera = "0:00:3"
Application.Wait(Now + TimeValue(Espera))
End Sub
esto hara una espera de 3 segundos, cambia el tiempo de espera a tu antojo

conviene hacer mencion de 'que hace' una instruccion con el metodo 'Wait(tiempo_de_espera)'...
=> SUSPENDE TODA 'actividad/interaccion' con el usuario y la interfase [incluyendo la macro 'en si']
'excepto'... procesos 'internos' [como un -re-calculo del modelo]

saludos,
hector.