ouverture de fichier et formules non calculées

Bonjour,

J'ouvre un fichier txt délimité par des "!" dans un classeur xls avec

Code:

---

1 2 3 4 5

Workbooks.OpenText Filename:=Path, _ Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlTextQualifierDoubleQuote, _ ConsecutiveDelimiter:=False, Tab:=False, Semicolon:=False, Comma:=False, _ Space:=False, Other:=True, OtherChar:="!", FieldInfo:=Array(1, 1), _ TrailingMinusNumbers:=True

---

Dans ce fichier il y a des formules . Par exemple

Code:

---

1 2	!=B8-B9-B10! ou !=SOMME.SI(A2:A5;"Sous Total Client";B2:B5)!

---

Dans les cellules excel, la 1ere formule est bien calculée dans la cellule. Par contre la 2èmè formule n'est pas calculée. J'ai tout le texte de la formule. Si je double clique sur la cellule, le calcul est effectué.
Que faut-il coder dans mon module vb pour ouvrir le fichier et que toutes les formules soient calculées?

Merci de votre aide.
Steph

Bonjour,

As-tu essayé :

Code:

---

1 2 3

Application.Calculate ActiveSheet.Calculate

---

Bonjour,

Je viens d'essayer, ça ne marche pas.
Une autre idée?

Dans le menu option calcul est-ce que calculer automatiquement est coché ?

Code:

---

1 2	Application.Calculation = xlAutomatic Calculate

---

edit : je ferai un test si j'ai le temp cette après midi

Oui c coché.

Re,

ça marche chez moi, simplement en ouvrant le fichier sans faire quoique ce soit de particulier !
Je viens de faire une test simple, et tout est calculé !