Application.Wait ?

Salut,

"Joël GARBE"
| L'instruction suivante :
|
| Application.Wait TimeSerial(Hour(Now()), Minute(Now()), Second(Now()) + 15)
|
| fonctionne parfaitement sur excel !
|
| Pourquoi pas sur Access, et quelle serait l'équivallent ?


Parce que le VBA d'Access n'est pas le VBA d'Excel ;-)

Utilise ceci (déclarer en haut, au dessus d'un module)
Public Declare Sub Sleep Lib "kernel32" (ByVal lngMilliseconds As Long)


Ensuite Sleep 5000 attend 5 secondes.


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/

Merci Pierre!

Moi qui pensais que les fonctions générales de ce type éatient universelles
à VBA ! Je suis bien déçu ;-)))

Bonne journée
--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"3stone" <3stone_@_skynet_be> a écrit dans le message de news:
ehwK6f6xFHA.736@tk2msftngp13.phx.gbl...

Salut,

"Joël GARBE"
| L'instruction suivante :
|
| Application.Wait TimeSerial(Hour(Now()), Minute(Now()), Second(Now()) +
15)
|
| fonctionne parfaitement sur excel !
|
| Pourquoi pas sur Access, et quelle serait l'équivallent ?


Parce que le VBA d'Access n'est pas le VBA d'Excel ;-)

Utilise ceci (déclarer en haut, au dessus d'un module)
Public Declare Sub Sleep Lib "kernel32" (ByVal lngMilliseconds As Long)


Ensuite Sleep 5000 attend 5 secondes.


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/