Bouton clignotant au démarrage

Le 28/02/2020 à 11:20

Bonjour le forum.

Je souhaiterais que mon bouton actuellement bleu soit clignotant au démarrage du fichier.

Pour les couleurs je souhaiterais qu'il clignote jaune et gris.

Le bouton provoque un chargement de divers macros, une fois la fin je souhaiterais qu'il devienne vert avec affichée "Gestion terminée".

J'ai essayé avec userform et des exemples dans le forum ca bug à chaque fois.

J'aimerais pouvoir comprendre et donc si vous pouvez modifier la macro ci-dessous.

Merci bien !

Private Sub CmdDémarrer_Click()

Me.CmdDémarrer.Caption = "Gestion en cours" 'change le texte du bouton

Dim Syn As Workbook

On Error GoTo GestionDesErreurs

Set Syn = ThisWorkbook

With Me.CmdDémarrer

.BackColor = &H8000000F 'défini la couleur du bouton

.Enabled = False

End With

VerifDossier ' recherche des fichiers rupture, réappro et X3

ChargementDesFeuilles Syn ' ouverture, transfert et fermeture des fichiers

Sheets(1).Select

MiseEnAffichageRupEtRéa

RechercheDoublon

Me.CmdDémarrer.Caption = "Gestion terminée !" 'change le texte du bouton

ChgFormatDate

Exit Sub

Le 28/02/2020 à 15:51

Bonjour

Vois ceci de Banzai64

https://forum.excel-pratique.com/viewtopic.php?t=57893

Bon courage et bon week'end

Rechercher des sujets similaires à "bouton clignotant demarrage"