XL 2010 Ajouter une barre de progression concernat un groupe de macro

Bonjour.
Il faut connaître à l'avance un nombre de fois qu'on va appeler une procédure de suivi de la progression.
On l'indique dans une procédure Tâche "Titre", NbrAppelsPrévus, "opé"
Pour le suivi de la progression c'est Call OùÇaEnEst
Joignez votre classeur, je l'équiperai de tout ça.

Remarque: il est assez rare d'en avoir besoin avec des macros qui accèdent le moins souvent possible à des nombres quelconques de cellules. (Ce sont les accès qui sont pénalisants pas les nombres de milliers de cellules chargées ou déchargées d'un coup lors de chacun dans ou depuis des tableaux dynamiques en mémoire. L'accès des milliers de fois à une seule cellule chaque fois est à proscrire absolument)

Bonsour®

Profane à dit:

Bonjour à tous,

j'explique mon soucis,
j'ai sur un classeur :
- plusieurs macros (jusqu'à la rien d'anormal)
- un bouton, qui exécute toutes ces macros à la suite (toujours rien d'anormal)
par contre je voulais ajouter un bout de code sur ce bouton en début et fin de macro, pour permettre une visualisation de la "progression" des différentes macro qui s'exécutent, et c'est LA que le bat blesse!!
après avoir lu différents posts, je m'aperçois que générer une progression Barre, relève des travaux d'hercules....
y a t'il un moyen simple de mettre en place cette fonctionnalité ou pas ?
d'avance Merci
Cordialement

Cliquez pour agrandir...

dans chaque macro appelée ajouter en debut de procédure :
Application.StatusBar "nom_de_la_procédure"
ou bien
Application.StatusBar "Etape n°" & "rang_de_la_procédure_dans_le process"

Bonjour à tous
@Dranreb, j'ai vu déjà ton code sur un autre post, et je l'ai testé (flashi mais trop complexe pour moi, je cherchai un truc plus simple
@Modeste geedee , merci c est ce que je cherchai
merci à vous deux

Bonsour®

Profane à dit:

Bonjour à tous
@Dranreb, j'ai vu déjà ton code sur un autre post, et je l'ai testé (flashi mais trop complexe pour moi, je cherchai un truc plus simple
@Modeste geedee , merci c est ce que je cherchai
merci à vous deux

Cliquez pour agrandir...

pour l'esthétique, quand le process est terminé ajouter l'instruction :
Application.StatusBar=False