Discussion :

[Oh!Tofocus]

Bonsoir a tous
Je voudrais insérer la formule SOMME(a1:a20) dans la case a22 d'une feuille

j'ai essayé ceci

Code :

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

Range("A22").Formula = "=somme(A1:A20)"

mais à l'execution j'ai l'affichage : "#VALEUR"
et il faut que je clique 2 fois dessus puis entrer pour que la somme apparaisse !

avez vous une solution ?

[tirex28]

Bonsoir,

Essaye

Code :

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

Range("A22").FormulaLocal = "=somme(A1:A20)"

Cordialement,

Tirex28/

[Bevan]

Bonsoir,

Pour une question de ce genre, il y a toujours la solution d'utiliser l'enregistreur de macros, qui te donnera :

Code :

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

.FormulaR1C1 = "=SUM(R[-21]C:R[-2]C)"

ou

Code :

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

.FormulaR1C1 = "=SUM(R1C1:R20C1)"

pour $A$1:$A$21

[fring]

Bonjour,

Un ptit mot d'explication :

FormulaLocal = écriture de la formule dans la langue de l'application. Cette syntaxe fonctionnera sur tous les pc possédant Excel en français mais coincera sur un pc possédant Excel en anglais.

Code :

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

Range("A22").FormulaLocal = "=SOMME(A1:A20)"

Formula = écriture de la formule dans la langue de VBA (anglais). Cette syntaxe fonctionnera sur tous les pc, quelque soit la langue de l'application.

Code :

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

Range("A22").Formula = "=SUM(A1:A20)"

[Oh!Tofocus]

Merci à vous trois
Tout est clair maintenant
et en plus ça marche.....