Formule d'un cellule en VB

[Thierry]

Bonsoir,


En VB, j'ai affecté une formule à une cellule en employant l'instruction
Worksheets(nom).Range('A10').Formula='=SOMME(A1:A9)'

La formule se retrouve bien dans la bonne cellule, mais je me retrouve avec un #NOM? à l'affichage. Quand je clique dessus pour afficher la formule puis appuie sur enter, le calcul s'effectue alors.

J'ai essayé un Calculate sans succès.

Comment faire pour que cela soit automatique. Il y a forcément une astuce.

Merci à tous.

 

[deudecos]

Bonsoir Thierry, le forum,

Sheets('nom').select
Range('A10').Select
ActiveCell.FormulaR1C1 = '=SUM(R[-9]C:R[-1]C)'
Range('A11').Select

Je crois que c'est comme ca qu'il faut faire... :unsure:

Bonne soiree

Olivier

 

[Thierry]

Re:Formule d'une cellule en VB

Et bien non, cela ne marche pas. Damned !

Une pointure VBA aurait-il une autre solution ?

Merci

 

[myDearFriend!]

Bonsoir Thierry, deudecos,

Peut-être peux-tu essayer :

      Worksheets(nom).Range('A10').Formula = '=SUM(A1:A9)'

Cordialement,

 

[JeanMarie]

Re:Formule d'une cellule en VB

Bonsoir

Essaye ceci
Worksheets(nom).Range('A10').Formula = '=SUM(A1:A9)'

@+Jean-Marie

PS : Salut Didier, je n'ai pas été assez rapide

Message édité par: JeanMarie, à: 31/08/2005 21:33

 

[deudecos]

Re Thierry, bonsoir Didier, Jean Marie, re le forum,

Comment ca ne marche pas ? c'est excel lui meme qui m'a fourni cette formule...
Et avec moi ca fonctionne plutot bien...
QQ peut il m'expliquer pourquoi ca marche avec moi et pas avec d'autres ?
Ps. J'ai eu cette formule en faisant fonctionner l'enregistreur ! 😉

Bonne soiree

Olivier

 

[MichelXld]

Re:Formule d'une cellule en VB

bonsoir Thierry , Olivier , Didier et Jean-Marie

tu peux aussi tester

Worksheets(nom).Range('A10').FormulaLocal = '=SOMME(A1:A9)'


bonne soiree
MichelXld

 

[Thierry]

Re:Formule d'une cellule en VB

C'est effectivement la formule que j'allais déposer dans le forum pour en faire profiter tout le monde.

Merci à tous.

A+

Thierry