Bonjour à tous
Petit problème de syntaxe avec une formule en variables.
Dans une Boucle For j’insère une formule:
Afin de simplifier, je met la formule sur la même ligne que les données de la BDD
Sub Stat_Mid()
'Met à jour les graphique et formules
Dim Nb_Lg_BDD As Integer
Dim Nb_Lg_Stat As Integer
Dim Lg As Integer
'Nombre de ligne dans la BDD
Nb_Lg_BDD = Worksheets("Stat_MID").Range("R2").Value
'Nombre de ligne dans la feuille Stat_MID
Nb_Lg_Stat = Worksheets("Stat_MID").Range("AA1").Value
Lg = 12
If Nb_Lg_BDD <> Nb_Lg_Stat Then
For i = 12 To Nb_Lg_Stat
Worksheets("Stat_MID").Range("AA" & Lg).Formula = "=ARCH_MIDLUM!V" & Lg - "ARCH_MIDLUM!W" & Lg
Lg = Lg + 1
Next
End If
End Sub
Cela me génère une Erreur N+13 "Incompatibilité de type"
Merci à Vous
Cordialement Eric.L