Mise en forme conditionnelle

Bonjour à tous,

Je suis en train de travailler sur un fichier excel avec des macros. L'objectif est de faire un rapport et d'indiquer les cellules vides dans une colonnes bien précise (admettons le B). Cependant, lorsque je roule le code, la macro fonctionne bien mais le reste des cellules en dessous du tableau est toujours coloré et donc non souhaiter.

Ma question est comment faire pour que la mise en forme conditionnelle soit appliquée uniquement dans la colonne du tableau et sur toute la colonne de la feuille?

formule: =NBCAR(SUPPRESPACE(B5))=0 s'applique à =$B$5:$B$682

NB:je voudrais la formule s,applique à la fin du tableau et non à la colonne B682

Merci infiniment.

Bonjour Brodyeva,

Avec ton fichier, nous aurions pu te faire une MFC qui conviendrait tout de suite à tes besoins

Pour le coup, celle-ci dessous est à tester :p

=ET(B5="";A5<>"")

En gros, la cellule ce met en couleur si elle est vide ET si la cellule adjacente n'est pas vide (donc qui fais partie de ton tableau)

Remplace donc A5 par une cellule qui n'est jamais vide dans ton tableau et ta MFC s'arrêtera à la fin de ton tableau !

Ci-dessous en exemple : Comme tu peux le voir la MFC s'arrête à la fin de mon tableau alors que la MFC s'applique jusqu'à la cellule B273

Merci infiniment Juice pour ton assistance.

Marche nickel,

Mais elle ne fonctionne pas avec la formule dans la macro:

=LEN(TRIM(B5))=0

Merci

Bonjour BrodyEva,

Comme je disais avec ton fichier sa aurait été plus simple ;D

Du coup, si tu veux écrire ta MFC via macro, alors je te propose deux méthodes.

La première :

Sub MFC_1()
Range("B6:B250").Select
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
    "=ET(B6="""";A6<>"""")"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
Selection.FormatConditions(1).Interior.Color = 65535
End Sub

Celle-ci est celle qui met en couleur la cellule vide en B ET pleine en A

La seconde :

Sub MFC_2()
Dim x As Long
x = Range("A" & Rows.Count).End(xlUp).Row
Range("B6:B" & x).Select
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
    "=B6="""""
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
Selection.FormatConditions(1).Interior.Color = 65535
End Sub

Celle-ci compte ton nombre de cellule en colonne A pour faire une MFC du même nombre de cellule.

Avec la seconde, si tu rajoute des lignes, elles ne seront pas prisent en compte dans ta MFC

Restant à dispo !

Bonjour Juice,

Merci pour ces codes. C'est réellement ce que je cherchais.