VBA - Suivre la progression d'un Application.FileSearch...

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

pedrag31

XLDnaute Occasionnel
Bonjour le forum,

J'utilise un UserForm qui me permet de rechercher et d'ouvrir un fichier (plan de pièces) a partir d'une référence de pièce. La référence de la pièce correspond au nom du fichier dans mon répertoire.

Lors du clic sur "Search" (Application.FileSearch), je souhaiterais afficher une barre de progression "perso" pour montrer l'avancement de la recherche en cours... La progression s'afficherait avec Userform5.show(modal) puis en faisant appel a la macro suivante:
Code:
Static Sub ProgressBar(x As Long, PourCent As Long)
    Progress = x / PourCent
    UserForm5.Label3.Width = Progress * 200
    UserForm5.Label2.Caption = MsgBar
    DoEvents
End Sub
Note : La progression est donc représentée par la largeur de Label3...

Savez-vous s'il existe un code intégré a la fonction FileSearch pour connaitre son statut/avancement (en % peut être)? Je souhaiterais faire qqch de similaire a la recherche standard Windows... Merci 🙂

J'ai trouvé un substitut sur ce site mais cela alourdit considérablement la recherche...

Merci d'avance pour vos précieux conseils.

Bonne journée, 🙂
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Retour