Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Coloration d'un onglet si le nombre de feuille est égale à 4

Créer une discussion

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 !

S'inscrire

aubelix

XLDnaute Impliqué
Bonsoir à tous les Amis du Forum. 🙂

Tout d'abord je vous souhaite à toutes et à tous de passer une bonne fête
de réveillon de la SAINT SYLVESTRE. 🙂

Je reviens vers vous pour la dernière question pour l'année 2010.
Mon problème est le suivant:

Comment colorer l'onglet "BASE" en rouge si le nombre de feuilles
est égale à 4. Dès qu'une ou plusieurs feuilles sont crées, le colorer
en vert. J'ai trouvé un code, mais il ne correspond pas à mon attente.

Cijoint.fr - Service gratuit de dépôt de fichiers

Par avance, Merci pour votre aide.
Cordialement.
 
Trier par date Trier par votes
Re : Coloration d'un onglet si le nombre de feuille est égale à 4

Bonjour,

pas tout compris moi :
Comment colorer l'onglet "BASE" en rouge si le nombre de feuilles
est égale à 4. Dès qu'une ou plusieurs feuilles sont crées, le colorer
en vert.
Cliquez pour agrandir...

et dès nouvelle feuille si > 4 on fait quoi... un peu plus d'explication est nécessaire, enfin pour moi...
Le mieux serait d'exposer clairement l'ensemble des règles....
bonne fin d'après midi
@+
 
Vote positif 0 Vote négatif
Re : Coloration d'un onglet si le nombre de feuille est égale à 4

Bonjour Pierrot93 🙂

Merci pour ta réponse.
Dans le fichier que j'ai joints, il y'a 4 onglets.
La feuille "BASE" doit être colorée en rouge.
Si l'on ajoute d'autres feuilles donc le nombre de feuilles
n'est plus de 4, colotrer l'onglet "BASE" en vert.
Et inversement s'i l'on supprime des feuilles contrôler
la quantité des onglets en sachant qu'il y'a toujours 4 ongelts
ceux du fichier joint.
J'espère avoir été clair.

Merci pour votre aide.
Cordialemet.
 
Vote positif 0 Vote négatif
Re : Coloration d'un onglet si le nombre de feuille est égale à 4

Salut aubelix et le forum
Bonne et heureuse année 2011
Module ThisWorkBook :
Code: 
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If ThisWorkbook.Sheets.Count > 4 Then
    ThisWorkbook.Sheets("BASE").Tab.ColorIndex = 3
Else
    ThisWorkbook.Sheets("BASE").Tab.ColorIndex = 4
End If
End Sub
J'avais commencé par la macro NewSheet, mais ça ne fonctionnait pas en supprimant la feuille => une fois passé en rouge, ça y restait.
A+
 
Vote positif 0 Vote négatif
Re : Coloration d'un onglet si le nombre de feuille est égale à 4

Bonjour Gorfael. 🙂

Merci pour ta réponse.
Cela fonctionne très bien.
J'ai uniquement interverti le code des couleurs.
Pour avoir l'onglet "BASE" en rouge si nb feuilles = 4 et en vert si > 4

Bonne et heureuse année 2011

Cordialement.
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

  • Question Question
XL 2019 [VB] Organisation et gestion du ménage et de l'entretien global (à améliorer)... Comment procéder ?
Réponses
13
Affichages
522
anthoYS
M
  • Question Question
Microsoft 365 Macro pour changer le format de nombre à l'ouverture d'un CSV
Réponses
4
Affichages
307
oguruma
O
  • Résolu(e)
Microsoft 365 Effacer le contenu de cellules si une autre cellule est vide
Réponses
9
Affichages
607
Olihoes
O
W
  • Question Question
XL 2010 si la cellule A de la feuille 1 est égale à alors la cellule B de la feuille 1 est égale à
Réponses
5
Affichages
603
Willbi
W
E
  • Résolu(e)
Microsoft 365 Afficher pop-up si la valeur d'une cellule de la sélection est inférieure à 0
Réponses
4
Affichages
792
erwinus_lupulus
E
F
  • Question Question
XL 2019 Remplissage de champs dans doc Word à partir d'excel
Réponses
4
Affichages
1 K
Staple1600
F
  • Résolu(e)
XL 2019 Power Query - extraire le nombre de semaine d'une année en fct d'une date
Réponses
11
Affichages
2 K
chris
G
  • Question Question
XL 2019 VBA / Macro Impression avec nombre de copies variables par feuille à imprimer
Réponses
5
Affichages
2 K
Gasner
G
S
  • Résolu(e)
XL 2019 Supprimer ou décaler une ligne lors d'un transfert de données d'un onglet à un autre via une macro
Réponses
6
Affichages
2 K
Sod2
S
D
  • Question Question
XL 2016 Calculer et afficher le nombre d'occurences de plusieurs feuilles dans une feuille recapitulative
Réponses
8
Affichages
3 K
dmayorie
D
M
  • Question Question
XL 2016 Réduire le nombre de SI dans ma formule (limité à 64)
Réponses
11
Affichages
1 K
mapomme
W
  • Question Question
Autres Alimentation feuille à partir d'une BDD sous condistions VBA Excel
2
Réponses
24
Affichages
3 K
wafaekam
W
J
  • Question Question
XL 2019 Calculer le nombre de jour entre 2 dates d'une action précise
Réponses
5
Affichages
976
JHA
J
S
  • Question Question
XL 2010 excel 2010 sur 5 colonnes: calculer le stock pouvant etre consommé en tenant compte de la date et du code de plusieurs articles différents
Réponses
3
Affichages
2 K
stivus bricsus
S
  • Résolu(e)
XL 2019 Compter le Nbre de ligne selon critères dans 2 colonnes - Macro VBA Excel 2019
Réponses
5
Affichages
1 K
Virginie17d
C
  • Question Question
Power Point colorier une case en fonction d'un nombre de cliques
Réponses
0
Affichages
599
CYRIL CAMPAS
C
P
  • Résolu(e)
XL 2019 Affectation d'une cellule vide la valeur de 1
Réponses
2
Affichages
2 K
Praveena
P
A
  • Question Question
XL 2010 Calculer le nombre de cellules répondant à un mois spécifié dans une plage
Réponses
5
Affichages
714
abouam
A
D
  • Résolu(e)
XL 2016 CODE VBA POUR DETERMINER LA DERNIERE LIGNE DE LA FEUILLE ACTIVE
Réponses
4
Affichages
3 K
didou78
D
F
  • Question Question
Microsoft 365 Aide à la construction d'un tableur de contrôle de données avec des formules uniquement.
Réponses
1
Affichages
911
fredd
F
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…