Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne b ien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques sec ondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne b ien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques sec ondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne b ien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques sec ondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour RV,
Tu peux aussi utiliser ceci :
A mettre dans le module de ta Form :
Private Declare Function GetTickCount Lib "Kernel32" () As Long
Sub Minuterie(Milliseconde As Long)
Dim Arret As Long
Arret = GetTickCount() + Milliseconde
Do While GetTickCount() < Arret
DoEvents
Loop
End Sub
Private Sub UserForm_Activate()
'ici, aprés 2 secondes la
'Form est fermée
Minuterie 2000
Unload Me
End Sub
Hervé.
"RV" a écrit dans le message de news:Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondesd'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ouencore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour RV,
Tu peux aussi utiliser ceci :
A mettre dans le module de ta Form :
Private Declare Function GetTickCount Lib "Kernel32" () As Long
Sub Minuterie(Milliseconde As Long)
Dim Arret As Long
Arret = GetTickCount() + Milliseconde
Do While GetTickCount() < Arret
DoEvents
Loop
End Sub
Private Sub UserForm_Activate()
'ici, aprés 2 secondes la
'Form est fermée
Minuterie 2000
Unload Me
End Sub
Hervé.
"RV" <inv@lide> a écrit dans le message de news:
OibZxNuyHHA.3916@TK2MSFTNGP02.phx.gbl...
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour RV,
Tu peux aussi utiliser ceci :
A mettre dans le module de ta Form :
Private Declare Function GetTickCount Lib "Kernel32" () As Long
Sub Minuterie(Milliseconde As Long)
Dim Arret As Long
Arret = GetTickCount() + Milliseconde
Do While GetTickCount() < Arret
DoEvents
Loop
End Sub
Private Sub UserForm_Activate()
'ici, aprés 2 secondes la
'Form est fermée
Minuterie 2000
Unload Me
End Sub
Hervé.
"RV" a écrit dans le message de news:Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondesd'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ouencore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
JB,
Une précision : pour le moment le formulaire se ferme si tu passes la
souris dessus
Merci
RV
"JB" a écrit dans le message de news:
Bonjour,
Sub ouvreForm()
UserForm1.Show
End Sub
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:05"), "fermeForm"
End Sub
Sub fermeForm()
Unload UserForm1
End Sub
http://cjoint.com/?husQTnLpCZ
JB
On 20 juil, 17:34, "RV" wrote:Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
JB,
Une précision : pour le moment le formulaire se ferme si tu passes la
souris dessus
Merci
RV
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
1184949779.927886.88480@w3g2000hsg.googlegroups.com...
Bonjour,
Sub ouvreForm()
UserForm1.Show
End Sub
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:05"), "fermeForm"
End Sub
Sub fermeForm()
Unload UserForm1
End Sub
http://cjoint.com/?husQTnLpCZ
JB
On 20 juil, 17:34, "RV" <inv@lide> wrote:
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
JB,
Une précision : pour le moment le formulaire se ferme si tu passes la
souris dessus
Merci
RV
"JB" a écrit dans le message de news:
Bonjour,
Sub ouvreForm()
UserForm1.Show
End Sub
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:05"), "fermeForm"
End Sub
Sub fermeForm()
Unload UserForm1
End Sub
http://cjoint.com/?husQTnLpCZ
JB
On 20 juil, 17:34, "RV" wrote:Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour Hervé,
J'ai mis à dispo dans un précédent post le classeur avec le gif à mettre
dans le répertoire Perso à la racine de c
Je vais essayer ta solution...
Merci
RV
"Hervé" a écrit dans le message de news:Bonjour RV,
Tu peux aussi utiliser ceci :
A mettre dans le module de ta Form :
Private Declare Function GetTickCount Lib "Kernel32" () As Long
Sub Minuterie(Milliseconde As Long)
Dim Arret As Long
Arret = GetTickCount() + Milliseconde
Do While GetTickCount() < Arret
DoEvents
Loop
End Sub
Private Sub UserForm_Activate()
'ici, aprés 2 secondes la
'Form est fermée
Minuterie 2000
Unload Me
End Sub
Hervé.
"RV" a écrit dans le message de news:Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondesd'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ouencore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour Hervé,
J'ai mis à dispo dans un précédent post le classeur avec le gif à mettre
dans le répertoire Perso à la racine de c
Je vais essayer ta solution...
Merci
RV
"Hervé" <hmsilve-sanspub@wanadoo.fr> a écrit dans le message de news:
uESmXDvyHHA.1212@TK2MSFTNGP05.phx.gbl...
Bonjour RV,
Tu peux aussi utiliser ceci :
A mettre dans le module de ta Form :
Private Declare Function GetTickCount Lib "Kernel32" () As Long
Sub Minuterie(Milliseconde As Long)
Dim Arret As Long
Arret = GetTickCount() + Milliseconde
Do While GetTickCount() < Arret
DoEvents
Loop
End Sub
Private Sub UserForm_Activate()
'ici, aprés 2 secondes la
'Form est fermée
Minuterie 2000
Unload Me
End Sub
Hervé.
"RV" <inv@lide> a écrit dans le message de news:
OibZxNuyHHA.3916@TK2MSFTNGP02.phx.gbl...
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Bonjour Hervé,
J'ai mis à dispo dans un précédent post le classeur avec le gif à mettre
dans le répertoire Perso à la racine de c
Je vais essayer ta solution...
Merci
RV
"Hervé" a écrit dans le message de news:Bonjour RV,
Tu peux aussi utiliser ceci :
A mettre dans le module de ta Form :
Private Declare Function GetTickCount Lib "Kernel32" () As Long
Sub Minuterie(Milliseconde As Long)
Dim Arret As Long
Arret = GetTickCount() + Milliseconde
Do While GetTickCount() < Arret
DoEvents
Loop
End Sub
Private Sub UserForm_Activate()
'ici, aprés 2 secondes la
'Form est fermée
Minuterie 2000
Unload Me
End Sub
Hervé.
"RV" a écrit dans le message de news:Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondesd'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque chose
ouencore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV
Ci joint l'image gif oubliée
http://cjoint.com/?hutW4GDXvB
@+ tard
RV
"RV" a écrit dans le message de news:
%JB,
Une précision : pour le moment le formulaire se ferme si tu passes la
souris dessus
Merci
RV
"JB" a écrit dans le message de news:
Bonjour,
Sub ouvreForm()
UserForm1.Show
End Sub
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:05"), "fermeForm"
End Sub
Sub fermeForm()
Unload UserForm1
End Sub
http://cjoint.com/?husQTnLpCZ
JB
On 20 juil, 17:34, "RV" wrote:Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test ( ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque cho se
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Ci joint l'image gif oubliée
http://cjoint.com/?hutW4GDXvB
@+ tard
RV
"RV" <inv@lide> a écrit dans le message de news:
%23L1gJOvyHHA.5...@TK2MSFTNGP03.phx.gbl...
JB,
Une précision : pour le moment le formulaire se ferme si tu passes la
souris dessus
Merci
RV
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1184949779.927886.88...@w3g2000hsg.googlegroups.com...
Bonjour,
Sub ouvreForm()
UserForm1.Show
End Sub
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:05"), "fermeForm"
End Sub
Sub fermeForm()
Unload UserForm1
End Sub
http://cjoint.com/?husQTnLpCZ
JB
On 20 juil, 17:34, "RV" <inv@lide> wrote:
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test ( ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque cho se
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Ci joint l'image gif oubliée
http://cjoint.com/?hutW4GDXvB
@+ tard
RV
"RV" a écrit dans le message de news:
%JB,
Une précision : pour le moment le formulaire se ferme si tu passes la
souris dessus
Merci
RV
"JB" a écrit dans le message de news:
Bonjour,
Sub ouvreForm()
UserForm1.Show
End Sub
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:05"), "fermeForm"
End Sub
Sub fermeForm()
Unload UserForm1
End Sub
http://cjoint.com/?husQTnLpCZ
JB
On 20 juil, 17:34, "RV" wrote:Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test ( ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque cho se
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Ci joint l'image gif oubliée
http://cjoint.com/?hutW4GDXvB
@+ tard
RV
"RV" a écrit dans le message de news:
%JB,
Une précision : pour le moment le formulaire se ferme si tu passes la
souris dessus
Merci
RV
"JB" a écrit dans le message de news:
Bonjour,
Sub ouvreForm()
UserForm1.Show
End Sub
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:05"), "fermeForm"
End Sub
Sub fermeForm()
Unload UserForm1
End Sub
http://cjoint.com/?husQTnLpCZ
JB
On 20 juil, 17:34, "RV" wrote:Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque
chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Ci joint l'image gif oubliée
http://cjoint.com/?hutW4GDXvB
@+ tard
RV
"RV" <inv@lide> a écrit dans le message de news:
%23L1gJOvyHHA.5...@TK2MSFTNGP03.phx.gbl...
JB,
Une précision : pour le moment le formulaire se ferme si tu passes la
souris dessus
Merci
RV
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1184949779.927886.88...@w3g2000hsg.googlegroups.com...
Bonjour,
Sub ouvreForm()
UserForm1.Show
End Sub
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:05"), "fermeForm"
End Sub
Sub fermeForm()
Unload UserForm1
End Sub
http://cjoint.com/?husQTnLpCZ
JB
On 20 juil, 17:34, "RV" <inv@lide> wrote:
Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque
chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Ci joint l'image gif oubliée
http://cjoint.com/?hutW4GDXvB
@+ tard
RV
"RV" a écrit dans le message de news:
%JB,
Une précision : pour le moment le formulaire se ferme si tu passes la
souris dessus
Merci
RV
"JB" a écrit dans le message de news:
Bonjour,
Sub ouvreForm()
UserForm1.Show
End Sub
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:05"), "fermeForm"
End Sub
Sub fermeForm()
Unload UserForm1
End Sub
http://cjoint.com/?husQTnLpCZ
JB
On 20 juil, 17:34, "RV" wrote:Bonjour,
Je lance un formulaire avec un gif animé, puis ma procédure test (ci
dessous), ce qui permet au gif de s'animer (jusque là tout fonctionne
bien)
Sub Test()
Application.OnTime Now + TimeValue("00:00:01"), "Test"
End Sub
Mon souci est la fermeture automatique du formulaire après quelques
secondes
d'affichage :
J'ai essayer de renseigner LatestTime avec EarliestTime + quelque
chose
ou
encore par ("00:00:03") mais rien n'y fait, je suis obligé de fermer le
formulaire par la croix.
Comment faire pour que ce formulaire se ferme automatiquement sans
intervention de ma part avec Excel 97 ?
Merci et bien cordialement.
RV- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -