Passer au contenu

Comment créer une barre de progression dans Excel 2000?

Solution : en colorant progressivement le contenu d’un contrôle Label.

Lorsqu’une macro met du temps pour s’exécuter, il est rassurant, pour l’utilisateur, de voir une barre de progression s’afficher à l’écran. Elle lui indique que la procédure avance normalement. Dans cet exemple, une macro va remplir un grand tableau avec des nombres aléatoires, et une barre de progression va s’afficher pendant tout le temps de son exécution.Pour cela, ouvrez un nouveau classeur Excel et accédez à l’éditeur de macro en appuyant sur Alt + F11. Ensuite, par le menu Insertion/UserForm, ouvrez un formulaire. Sur ce dernier, placez un contrôle Intitulé (label). Dans sa propriété Caption, saisissez “Patientez…“.
Placez ensuite un contrôle de type Cadre (frame) puis, à l’intérieur de celui-ci, un nouveau contrôle Label que vous nommerez Label2. Sur ce dernier contrôle, changez la propriété BackColor en &H000000FF&, et la propriété SpecialEffect en fmSpecialEffectRaised. Cliquez deux fois sur le formulaire pour ouvrir sa page de code et saisissez le premier listing ci-dessous.Déroulez ensuite Insertion/Module et saisissez le second listing. Retournez dans Excel et lancez la macro ShowUserForm en déroulant le menu Outils/Macro/Macros.

🔴 Pour ne manquer aucune actualité de 01net, suivez-nous sur Google Actualités et WhatsApp.


Alain Coupel