XL 2010 Mise en forme conditionnel [VBA] critères multiple

  • Initiateur de la discussion Initiateur de la discussion Nylream
  • 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 !

N

Nylream

Guest
Bonjour,

J'aimerais utiliser le VBA pour ma mise en forme conditionnel (je ne souhaite pas utiliser l'outil de base).
J'ai trois type de mise en forme pour mon tableau :
  1. Un mot à mettre en rouge si présent
  2. Doublon sur une même colonne : fond de la ligne à changer (prioritaire)
  3. le fond d'une ligne à changer, en fonction de deux cellule (F et G) sur cette même ligne
Concrètement:
  • Si deux fois le même nom en colone A, le fond de la ligne en rouge
  • Si (F= "Navy") + (G = "O-11", "O-10", "O-9") alors couleurs #xxxx
  • Si (F= "Marines") + (G = "O-11", "O-10", "O-9") alors couleurs #yyyy
  • le mot "Unkow" toujours en rouge
J'ai testé pour le mot "Unknow" en rouge, mais en vain, les autres étant plus complexe, je cale.

Code:
Sub ColorOnDouble()

    Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=$B2:$K="Unknow""
    ligne .Color = 255
   
End Sub

Merci d'avance pour votre aide,
 

Pièces jointes

Bonjour Nylream,

Il faut défusionner la cellule F50 et donner à la colonne F la largeur 80.

Et pour ajuster la hauteur exécutez où et quand vous voulez le code :
Code:
With Feuil6.[F50] 'CodeName de la feuille Orders
  .WrapText = True
  .Rows.AutoFit
End With
Pour le PDF vous définirez bien sûr la zone d'impression sur F2:F60.

Maintenant ce fil a bien assez duré, si vous rencontrez d'autres problèmes ouvrez d'autres discussions, une pour chaque problème différent.

Bonne continuation.
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
6
Affichages
306
Réponses
5
Affichages
635
W
Réponses
25
Affichages
1 K
Réponses
7
Affichages
344
Retour