Hello
I made a little macro that make a hide on font color in a column but is stooping at the first blank cell. I don't know if is the best solution for that , maybe an auto filter is the best solution, so i don't make to do unhide every time i apply the macros .
Here is the codeThanks for you helpSub FILTER_FONTCOLOR() 'On g?le l'?cran Application.ScreenUpdating = False 'D?claration des variables Dim i As Long Dim coll As Integer Dim color As Integer coll = InputBox(Prompt:="Choisir Colonne a filtrer") color = InputBox(Prompt:="Choisir Couleur a filtrer") 'Code i = 2 'En partant de la 2?me ligne, on peut conserver une ligne d'ent?te While Not IsEmpty(Cells(i, coll)) If Not Cells(i, coll).Font.ColorIndex = color Then Rows(i).EntireRow.Hidden = True End If i = i + 1 Wend End Sub