Bonjour

Apres qq recherches...et ne trouvant pas de rep, j'expose mon pb !
Le voici !

Sur la ligne 3, de L3 à BD3 j'ai ceci :
de L3 à O3 Janvier 09
de P3 à S3 février 09
et ainsi de suite jusque Décembre 09 en BD3

Si nous sommes en juin, j'aimerais sélectionner le mois de mai et ainsi de suite.
Voici mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Sub Macro1()
    
    Sheets("FFR_Synthesis_BC").Visible = True
    Sheets("FFR_Synthesis_BC").Select
    Dim mydate, mydate2

edit :     mydate = Month(Date)  1
           mydate2 = Month(Date) - 2    
MsgBox Format(mydate, "mmm yyyy")

' pour information BD3 = cells (3,56) tandis que L3 = cells (3,11)

'Range("BD3").Select
For colindex = 56 To 11
        With Worksheets("FFR_Synthesis_BC").Cells(3, colindex)
            If (.Value >= mydate) Then
            Else
               Application.Goto reference:=Worksheets("FFR_Synthesis_BC").Cells(3, colindex), Scroll:=True
            End If
        End With
   Next colindex
   Sheets("FFR_Synthesis_BC").Visible = False
End Sub
Le problème est que je n'entre meme pas dans la boucle With j'ai l'impression
Si vous avez des pistes, je vous en remercierais par avance !

A bientot