Barre de progression pendant boucle While
Fermé
yaciin
Messages postés
23
Date d'inscription
mercredi 15 janvier 2014
Statut
Membre
Dernière intervention
27 août 2014
-
10 mars 2014 à 11:26
yaciin Messages postés 23 Date d'inscription mercredi 15 janvier 2014 Statut Membre Dernière intervention 27 août 2014 - 11 mars 2014 à 12:19
yaciin Messages postés 23 Date d'inscription mercredi 15 janvier 2014 Statut Membre Dernière intervention 27 août 2014 - 11 mars 2014 à 12:19
A voir également:
- Barre de progression pendant boucle While
- Windows 11 barre des taches a gauche - Guide
- Égal barré ✓ - Forum Bureautique
- Quelle touche clavier ou combinaison pour désigner "différent de ✓ - Forum Word
- Caractère "différent" ou "pas égal à" - Forum Bureautique
- Barre verticale clavier - Forum Excel
2 réponses
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 776
10 mars 2014 à 20:48
10 mars 2014 à 20:48
Bonjour,
Tu devrais trouve la réponse chez Jacques Boisgontier :
http://boisgontierjacques.free.fr/pages_site/formulaireProgression.htm
Tu devrais trouve la réponse chez Jacques Boisgontier :
http://boisgontierjacques.free.fr/pages_site/formulaireProgression.htm
yaciin
Messages postés
23
Date d'inscription
mercredi 15 janvier 2014
Statut
Membre
Dernière intervention
27 août 2014
11 mars 2014 à 12:19
11 mars 2014 à 12:19
non aucun des 3 scénario correspond à mon probléme :/
Merci comém.
j'ai procédé différemment, j'ai essayé d'utiliser un userform le temps d'attente, mais j'ai pas pu fermer cet userform à la fin du temps d'attente malgré plusieurs essais
voilà mon code :
'affichage du userform
sap.Show vbModeless
fichier_1 = "table_inventaire.txt"
fichier_2 = "table_mard.txt"
chemin = ThisWorkbook.Path & "\"
'premier temps d'attente
Set fso1 = CreateObject("scripting.filesystemobject")
While fso1.FileExists(chemin & fichier_1) = False
Wend
'deuxieme temp d'attente
Set fso2 = CreateObject("scripting.filesystemobject")
While fso2.FileExists(chemin & fichier_2) = False
Wend
'fermeture que j'ai essayé
sap.Hide
Unload sap
Help plz, c'est simple je devine mais ça me bloque :/
Merci
Merci comém.
j'ai procédé différemment, j'ai essayé d'utiliser un userform le temps d'attente, mais j'ai pas pu fermer cet userform à la fin du temps d'attente malgré plusieurs essais
voilà mon code :
'affichage du userform
sap.Show vbModeless
fichier_1 = "table_inventaire.txt"
fichier_2 = "table_mard.txt"
chemin = ThisWorkbook.Path & "\"
'premier temps d'attente
Set fso1 = CreateObject("scripting.filesystemobject")
While fso1.FileExists(chemin & fichier_1) = False
Wend
'deuxieme temp d'attente
Set fso2 = CreateObject("scripting.filesystemobject")
While fso2.FileExists(chemin & fichier_2) = False
Wend
'fermeture que j'ai essayé
sap.Hide
Unload sap
Help plz, c'est simple je devine mais ça me bloque :/
Merci