Run VB chart countdown everytime code moves to sheet.

[saudi_red_neck]

Hello friends! hope all is well,

Please help me. the attachment here has two codes:
1. Code goes to the next sheet (to the right) every 5 seconds, and when it reaches the last sheet,
it goes back to the very 1st sheet - That is working.

2. Every time a new sheet is selected a count down 3 to zero chart runs - That is not really working.

it works well on every sheet, but it doesn't run on the 1st and the last sheet properly.

Please help me make the display show 3,2,1,0 once on every sheet.

Thank you so much in advance!