Bonsoir le Forum
J'ai un peit souci avec mon classeur excel.
Je souhaiterais afficher les feuilles de mon classeur les unes après les autres depuis la 3eme jusqu'à la dernière avec une temporisation de 3 secondes (pour l'exercice)
J'ai écrit ce bout de code (enfin j'ai plutôt agrégé différents petits bouts trouvés ici ou là)
Option Explicit
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub NextSheetTemporisation()
Dim sht As Integer
Sheets(3).Select
' Parcourt toute les feuilles du classeur
For sht = 3 To ThisWorkbook.Worksheets.Count
Sheets(sht).Select
Sleep 3000
Next
End Sub
Lorsque j'exécute ma macro pas à pas (FN -F8) ça marche, je vois bien défiler mes feuilles une à une avec une temporisation de 3 secondes, mais lorsque je la lance (FN - F5) je ne vois que la dernière feuille.
Merci beaucoup à celui ou celle qui lira mon message et qui pourra m'apporter de l'aide.
Bonne soirée à tous
Chloé
J'ai un peit souci avec mon classeur excel.
Je souhaiterais afficher les feuilles de mon classeur les unes après les autres depuis la 3eme jusqu'à la dernière avec une temporisation de 3 secondes (pour l'exercice)
J'ai écrit ce bout de code (enfin j'ai plutôt agrégé différents petits bouts trouvés ici ou là)
Option Explicit
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub NextSheetTemporisation()
Dim sht As Integer
Sheets(3).Select
' Parcourt toute les feuilles du classeur
For sht = 3 To ThisWorkbook.Worksheets.Count
Sheets(sht).Select
Sleep 3000
Next
End Sub
Lorsque j'exécute ma macro pas à pas (FN -F8) ça marche, je vois bien défiler mes feuilles une à une avec une temporisation de 3 secondes, mais lorsque je la lance (FN - F5) je ne vois que la dernière feuille.
Merci beaucoup à celui ou celle qui lira mon message et qui pourra m'apporter de l'aide.
Bonne soirée à tous
Chloé