Compte à rebours dans la barre d’état à l’aide VBA dans Microsoft Excel
Si vous vous demandez comment puis-je créer une minuterie dans Excel Question:
Un compte à rebours de 30 à 0 secondes doit être affiché dans la barre d’état.
Réponse:
Insérez le code suivant dans le module standard.
Sub CountDown() Dim intCounter As Integer Dim bln As Boolean bln = Application.DisplayStatusBar Application.DisplayStatusBar = True For intCounter = 30 To 1 Step -1 Application.StatusBar = intCounter & " Seconds..." Application.Wait Now + TimeSerial(0, 0, 1) Next intCounter Application.StatusBar = False Application.DisplayStatusBar = bln End Sub In this way you can use status bar to display excel vba timer.