Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.
  • Initiateur de la discussion Initiateur de la discussion Jelf
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Jelf

XLDnaute Occasionnel
Bonjour

Est-il possible de faire clignoter un onglet.
Si oui, comment???

Merci
 
Bonjour

La faisabilité du clignotement d'un onglet, impose une version d’Excel supérieure à la version 2000.

Malheureusement je ne possède pas une supérieure à 2000. Mais la version 2007 beta

Code à mettre dans le ThisWorkBook de ton fichier
Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
   If Val(Application.Version) > 9 Then
      Application.OnTime EarliestTime:=vTime, _
         Procedure:='ClignOnglet', Schedule:=False
   End If
End Sub

Private Sub Workbook_Open()
   Cycle
End Sub

et ce code dans un module du même fichier
Code:
Public vTime As Date

Sub ClignOnglet()
   With ActiveWorkbook.Sheets('Feuil1').Tab
       .ThemeColor = 5 - .ThemeColor
   End With
   Cycle
End Sub

Sub Cycle()
   If Val(Application.Version) > 9 Then
      vTime = Now + TimeValue('00:00:01')
      Application.OnTime vTime, 'ClignOnglet'
   End If
End Sub

@+Jean-Marie

PS : j'espère qu'il n'y aura pas de caractères indésirables pour la recopie.
 
Bonjour et merci pour les formules, Je rencontre un petit problème avec 1 terme 'Schedule' mon VBA ne connait pas ce terme.
Toute la ligne me pose 1 problème
: Procedure := 'Clionglet' ,Shedule:= False

Tout ce qui est en rouge est refusé.
Cela provient sans doute de mon excel (2000).
Si tu as une autre solution, je suis preneur.

Merci d'avance
 
Re...

Désolé, tu as pas lu, ce que je disais au début. Ta version d'excel ne permet pas de changer la couleur de l'onglet d'une feuille. Il faudra que tu fasses une mise à jour d'office.

@+Jean-Marie
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
43
Affichages
816
Réponses
5
Affichages
701
Réponses
5
Affichages
140
Réponses
18
Affichages
538
Réponses
7
Affichages
266
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…