Bonjour,
Débutante en VBA, j'essai de faire une macro pour avoir le résultat d'une formule et la glisser.
Je ne peux pas le faire directement sans macro car tout simplement excel bug en glissant la formule sur 2220 ligne et 6 colonnes.
Pour résumer ma formule est
SIERREUR(INDEX(Feuil1!D:D;EQUIV(Feuil4!A2&Feuil4!D1;Feuil1!C:C&Feuil1!I:I;0));"")
Avant de mettre des variables pour les ligne et colonnes, j'ai essayé de coder la formule de base mais ca ne marche pas
Mon programme VBA simplifié de base pour la formule est
Sub essai1()
For i = 2 To 15
Dim i As variable
Sheets("feuil4").Range("D" & i).FormulaArray = _
"=IFERROR(INDEX(Feuil1!C,MATCH(Feuil4!RC["&-i&"]& Feuil4!R[-1]C,Feuil1!C[-1]&Feuil1!C[5],0)),"""")"
Next
End Sub
J'ai comme message "Erreur de compilation attente : fin d'instruction " et il me surligne mon code en rouge
Est ce que quelqu'un pourrait me dire ce que j'ai oublié ?
Merci d'avance
M