Calculate d'une plage

Bonjour !

J'ai un petit problème tout simple qui tient en une phrase :
mon "Range("D3").Calculate" ne fonctionne pas :cry:

Celui-ci est placé dans une macro qui va (au final) faire des calculs sur une plage, puis sur une autre (sans que celle d'avant ne change forcément, le problème étant que les données utiles à ces deux calculs sont dans une même feuille qui change ses données entre temps).

Donc voilà, quand je fais un simple "Calculate", cela fonctionne.
Seulement les deux plages se font en même temps forcément.

Merci de votre aide, je ne sais pas si j'ai été assez clair...

Salut PtitGénie et le forum
si "Range("D3").Calculate" ne fonctionne pas, comment veux-tu qu'on t'aide ? Pas de fichier test, pas de code, juste ça comme info, c'est pas un peu léger ?
A+

Citation:

---

Envoyé par Gorfael

Salut PtitGénie et le forum
si "Range("D3").Calculate" ne fonctionne pas, comment veux-tu qu'on t'aide ? Pas de fichier test, pas de code, juste ça comme info, c'est pas un peu léger ?
A+

---

Si ça t'amuse d'ouvrir des fichiers tests...

@PtitGénie:
La cellule D3 contient bien une formule ?
Si oui, les valeurs des cellules référencées dans cette formule ont bien été changées depuis le dernier calcul*?

Salut zazaraignée et le forum

Citation:

---

Si ça t'amuse d'ouvrir des fichiers tests...

---

C'est pas que ça m'intèresse particulièrement, mais s'il a des cellules calculées comme sources de D3....
on pourrait toujours faire avec les dépendants de Target, mais dans ce cas, ça reviendrait à un calculate global.
A+

Personnellement, j'ai testé ceci :

J'ai mis dans les cellules A1 et C1 la formule suivante qui génère un nombre aléatoire compris entre 1 et 100.

Code:

---

=ARRONDI(ALEA()*100+1; 0)

---

Puis j'ai créé cette petite macro

Code:

---

1 2 3

Sub toto() Feuil1.Range("A1").Calculate End Sub

---

Quand j'exécute toto, les deux cellules sont recalculées...

Citation:

---

Envoyé par zazaraignée

P...
Quand j'exécute toto, les deux cellules sont recalculées...

---

pour limiter l'action du recalcul il faut passer le classer en mode "calcul sur ordre" voir Outils/Option/onglet calcul/Sur Ordre

Citation:

---

Envoyé par JackOuYA

pour limiter l'action du recalcul il faut passer le classer en mode "calcul sur ordre" voir Outils/Option/onglet calcul/Sur Ordre

---

J'y suis, perso ^^

Donc oui désolé pour le manque de précisions, mais c'est difficile de mettre des mots sur un problème qu'on a précis en tête ^^

Voilà ma macro :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43

Dim nom, nom1, mois, secteur, poste, groupe, mag As String Sheets("TRUC").Select Range("B3").Select nom = ActiveCell.FormulaR1C1 Range("B6").Select poste = ActiveCell.FormulaR1C1 Range("B7").Select secteur = ActiveCell.FormulaR1C1 Range("B8").Select mois = ActiveCell.FormulaR1C1 Range("B9").Select groupe = ActiveCell.FormulaR1C1 Range("B10").Select mag = ActiveCell.FormulaR1C1 Range("B11").Select nom1 = ActiveCell.FormulaR1C1 Sheets("Suivi_Resultat_sur_Exercice").Select Selection.AutoFilter Field:=7, Criteria1:=nom If nom = "" Then Selection.AutoFilter Field:=7 Selection.AutoFilter Field:=4, Criteria1:=mois If mois = "" Then Selection.AutoFilter Field:=4 Sheets("TRUC").Select Range("D3").Calculate Sheets("Suivi_Resultat_sur_Exercice").Select Selection.AutoFilter Field:=7 Selection.AutoFilter Field:=4 Sheets("TRUC").Select

---

Si j'enlève le "Range(D3)", toute la feuille "TRUC" se recalcule, si je précise avec le Range, plus rien du tout ne se fait.

Ah et voici ce que contient ma cellule D3 :

Code:

---

=Suivi_Resultat_sur_Exercice!J1/Suivi_Resultat_sur_Exercice!N1

---

Bon, c'est bon c'était tout con : étant en mode manuel pour le calcul, l'autre page où des chiffre devaient changé ne changeaient pas, donc forcément sur la feuille où je fais des calculs avec ces chiffres étaient toujours identiques.
Bref 8O