Alimenter une colonne en fonction d'une date recherché

Bah du coup pour trouver la bonne colonne c'est bon ! Je t'ai dit d'utiliser ce code

i = Range("AP3:AP6500").End(xlToRight).Column
For j = 42 To i                            
    If Cells(3, j) = DateCible Then
        Exit For                           
    End If
Next

Salut Juice ! Oui je n'avais pas vu ton double post.

J'ai essayer et c'est parfait , reste à appliquer ça sur les 3 fichiers. Merci à tous !