Discussion :

[thor18]

Bonjour,

Quand je fais ceci il n'y a pas de problème

Code :

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

1
2
Var = Cells(i, CollonneDesMoyennes).Select
ActiveCell.FormulaR1C1 = "=SUM(RC[-1]:R[1]C[-1])"

par contre quand je remplace 1 par var si on admet que Var = 1

Code :

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

ActiveCell.FormulaR1C1 = "=SUM(RC[-1]:R[Var]C[-1])"

celà ne fonctionne plus.

Peut-on utiliser des variables dans ce cas?

Merci

[Gorfael]

Salut thor18 et le forum
Chez moi, ça marche

Code :

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

1
2
3
4
5
Sub Macro1()
Dim var
var = 1
    ActiveCell.FormulaR1C1 = "=SUM(RC[-2]:RC[-" & var & "])"
End Sub

Une formule est du texte
A+