Comment insérer une minuterie dans MS Excel

Ouvrez une feuille de calcul Excel et cliquez sur "Développeur" dans la barre de menus en haut de l'écran. S'il n'apparaît pas dans la liste, cliquez sur le bouton "Microsoft Office", "Options Excel", "Populaire" et sélectionnez l'onglet "Afficher le développeur".

Cliquez sur "Insérer" dans la nouvelle fenêtre qui apparaît et sélectionnez "Procédure" dans le menu déroulant, tapez un nom pour la nouvelle procédure tel que "ExcelTimer" et assurez-vous que le type sélectionné est "Sub".

Ecrivez le texte suivant dans des lignes séparées dans le panneau de droite entre "Public Sub ExcelTimer ()" et "End Sub": Dim PauseTime, Start, Finish, TotalTime If (MsgBox ("Appuyez sur Oui pour obtenir un rappel de pause", 4 )) = vbYes Then PauseTime = 10 Start = Minuterie Do While Timer <Start + PauseTime DoEvents Application.Speech.Speak "Il est temps de faire une pause!" Loop Finish = Timer TotalTime = Finish - Start MsgBox "La pause a duré pour" & TotalTime & "secondes" Else End End If End Sub

Vérifiez la fonction en appuyant sur la touche "F5". Une feuille de calcul Excel standard s'ouvrira et vous devriez voir une petite fenêtre avec le texte "Appuyez sur Oui pour obtenir un rappel de pause" (Appuyez sur "Oui" pour obtenir un rappel). Cliquez sur le bouton "Oui" Si vous ne voyez pas la même chose, assurez-vous que vous avez correctement inséré le code à l'étape 3.

Cliquez sur "OK" lorsque l'exécution du minuteur est terminée pour revenir à la feuille de calcul.

Attribuez une touche de raccourci à cette action en la sélectionnant dans les listes de macros et en cliquant sur "Options".