Bonjour,

j'ai créé une macro qui dans un certain cas affecte à une cellule une formule du type =index .... pour faire référence à une autre cellule.

la macro :
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
Sub avecTF()
    Dim tempo As Integer
    Dim per
 
    For rwindex = 35 To 76
        For temp = 3 To 50
            If Worksheets("CNMIS").Cells(rwindex, 3).Value = Worksheets("annexeCNMIS").Cells(temp, 6).Value Then
                If Worksheets("CNMIS").Cells(rwindex, 18).Value = 2 Then
                    Worksheets("CNMIS").Cells(rwindex, 7).Formula = "=index(annexeCNMIS!$F$3:$H$50;M" & rwindex & ";3)"
                Else
                    .....
                End If
            End If
        Next temp
    Next rwindex
End Sub
mon problème se situe la :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Worksheets("CNMIS").Cells(rwindex, 7).Formula = "=index(annexeCNMIS!$F$3:$H$50;M" & rwindex & ";3)"
j'obtiens une erreur de type 1024, mais je n'arrive vraiment pas à voir ce qui cloche.
Merci de votre aide