Bonjour
Je cherches à faire boucler la procédure suivante pour chaque ligne d'un classeur excel.
Mon but est qu'en fonction de la date saisie dans la colonne A, j'obtiennes la mise en gras des infos jusqu'à la colonne N incluse.
Si la date est inferieure à la date du jour aucune modif à faire.
Voici mon code qui fonctionne, mais que sur la ligne 1:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub CellulesEnGras()
     If Not IsEmpty(Range("A1")) Then
                    If Range("A1") = Date Then
                        With Range("A1:N1")
                           .Font.Bold = True
                        End With
                    Else
                        With Range("A1:N1")
                            .Font.Bold = False
                       End With
                    End If
 
      End If
End Sub