Mise en forme conditionnelle avec détection de couleur

Bonjour à tous,

J'ai une petite question, Je vous préviens d'avance je suis une utilisateur plus qu'occasionnel de ce bon vieux excel. Même si je dois avouer que je ne l'utilise que trop peu!

Je vous explique donc mon problème:

Dans la colonne A, de ma feuille, j'ai colorisé certaines cases de la colonne. (d'une couleur dont je connais le code 36)

Je souhaite que les lignes dont la colonne A est colorisée soit elles-même colorisée de la colonne B jusque K

En cherchant un peu j'en suis venu à ce ci mais je n'obtiens aucun résultat :s

Function CellInteriorColor(Plage As Range, NumeroDeCouleur%) As Long
Application.Volatile True
Dim wCell As Range
For Each wCell In Plage
If wCell.Font.ColorIndex = NumeroDeCouleur Then
Range(b$, k$).Interior.ColorIndex = "36"
End If
Next
End Function

Qu'est-ce que je ne comprend pas??

merci d'avance

Adrien

Bonjour

Sauf erreur ou omission

Une Function(fonction) retourne une valeur mais ne modifies en aucun cas une cellule

Il faut utiliser une Sub (traduction : fonction_sans_valeur_de_retour )

On ne peut pas utiliser une procédure événementielle car le changement de couleur d'une cellule ne provoque aucun évènement que l'on pourrait intercepter ( comme par exemple la modification de la valeur d'une cellule, le déplacement du curseur etc ....)

Voici une méthode qui te colorise la ligne de B à K

Mode d'emploi

Tu colorises ta cellules en colonne A

Tu quittes la ligne

Puis tu y reviens

Code à copier dans le module de la feuille

Clic droit sur le nom de l'onglet ---> Visualiser le code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Count > 1 Then Exit Sub
  If Range("A" & Target.Row).Interior.ColorIndex = 36 Then
    Range("B" & Target.Row & ":K" & Target.Row).Interior.ColorIndex = 36
  End If
End Sub

On utilise l'évènement déplacement du curseur

regardes par Là

Merci beaucoup cela m'éclaire

Efficace et merci pour le tuto et les exemples!