NBVAL et COUNTA

[Neonato]

Bonjour tout le monde,

Une petite question pour les pros.

J'ai un problème(*) du type

Range("F14").Select
ActiveCell.FormulaR1C1 = "=COUNTA(R[-9]C[-2]:R[-2]C[-2])"

(*) En fait cette formule fonctione

Que je veux transformer en :

Range("F14").Select
i=9
ActiveCell.FormulaR1C1 = "=COUNTA(R[-i]C[-2]:R[-2]C[-2])"

ou

Range("F14").Select
ActiveCell.FormulaR1C1 = "=COUNTA(D1025)"

Mais cela ne fonctionne pas

Si quelqu'un connait l'expression Exacte je serais très content

Merci de vos reponses

@+

Néo

 

[Pascal76]

Bonjour

essaies

ActiveCell.FormulaR1C1 = "=COUNTA(R[-" & i & "]C[-2]:R[-2]C[-2])"

Bon courage

Pascal

 

[Neonato]

Merci 1000 fois Pascal

A la prochaine

A+