Bonjour,
(Je n'ai rien trouvé de plus percutant pour mon intitulé.)
Pour faire une copie de ma base j'ai le code suivant:
Pendant la copie je voulais faire clignoter une étiquette qui indique "Patientez ". Tout fonctionne bien jusqu'au départ de la copie. Là mon étiquette arrête de clignoter. Elle recommence quand la copie est terminée.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Dim fs As Object Set fs = CreateObject("Scripting.FileSystemObject") fs.copyfile "c:\users\le dauphin bleu\documents\hotel1.accdb", Clef & ":\"
Quelqu'un pourrait me dire pourquoi et surtout m'expliquer comment faire.
Une autre question , si vous voulez bien.
A la place de l'étiquette, j'aimerais faire une barre de progression. J'ai trouvé un tuto mais je ne l'ai pas compris.
A votre bon coeur.
Merci
Partager