XL 2019 VBA et Power Query - Barre de progression

[Flx1er]

Bonjour,
Je dois importer des fichiers CSV de plusieurs milliers de lignes. Ce traitement prend un certain temps.

Est-il envisageable de récupérer le nombre de lignes chargées (suite à l'actualisation) et le nombre maximum de lignes de la source de données pour concevoir une barre de progression en VBA afin de faire patienter la personne chargée de ce travail?

Ou bien existe-t-il une autre méthode pour créer une barre de progression ?

Mon exemple est relativement sommaire

En vous remerciant

 

[crocrocro]

Bonjour Flx 1er,
Quelques questions :
A chaque import, le nombre, la taille des fichiers à importer est-elle à peu près la même ?
Le "un certain temps" , moins d'1 minute, plusieurs minutes, plus d'1 heure ?
Moins d'une minute, un simple "veuillez patienter quelques instants au lancement du traitement" me parait suffisant.
Dans le cas d'une boucle classique, par exemple de 1 à 100 000, il est facile de mettre au point une barre de progression, par exemple en affichant dans la StatusBar, toutes les 1000 occurrences une barre en % du traitement.
Dans votre cas, ce n'est évidemment pas possible. Une proposition :
- Effectuer une série de tests de durée en fonction de la taille (en octets), du nombre de lignes des fichiers, du nombre de fichiers à importer.
- En tirer une règle qui donne approximativement la durée globale selon les valeurs (taille, nombre de lignes, nombre).
-Utiliser Application.OnTime pour déclencher l'affichage de la barre de progression en fonction du % de la durée totale prévue, par exemple pour une durée totale estimée = 10 minutes, chaque 6" si vous souhaitez faire actualiser à chaque 1 % du traitement.

En pj, un fichier avec quelques exemples d'utilisation de la barre de progression dans la barre de Statut. A adapter bien sûr ...