Bonjour à tous,

Je souhaite insérer cette formule dans mon tableau Excel. Celle-ci doit-être fonctionnelle uniquement toutes les 4 colonnes à partir de J4 et sur toutes les lignes de ces colonnes. La 1ère colone de mon tableau est en A4.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
=SI(I4="";"";MOIS.DECALER(I4;$H$2))
J'ai commencé ça, mais je ne sais pas écrire cette formule en VBA
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
For Each c In Range([A4], Cells(Rows.Count, 1).End(xlUp))
        For i = 10 To 66 Step 4
            If Cells(c.Row, i - 1) = "" Then
            'ici rien ne se passe
            Else
            Cells(c.Row, i).Formula = "" 'ici ma formule
                End If
                Next i
            Next c
Merci par avance pour votre aide