Discussion :

[Junness]

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

[Commodore]

a vrai dire, j'utilise d'habitude la propriété FormulaR1C1 car j'ai déjà eu ce problème avec Formula et je n'ai jamais réussi a le résoudre...

Si la plage est unidimensionnelle ou bidimensionnelle, vous pouvez affecter à la formule un tableau Visual Basic de même dimension.

Je me demande si tu ne peux pas faire comme ça pour alléger le traitement ?

[SfJ5Rpw8]

essai

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.FormulaLocal

pour les formules en langue locale (français..), Formula tout court réclame des formules anglaises;..

[Junness]

ça marche, merci beaucoup