Comment forcer le calcul d'une cellule en VBA

JNP

XLDnaute Barbatruc

• 8 Octobre 2007

• #16

Re : Comment forcer le calcul d'une cellule en VBA

Merci Luki,
Effectivement, j'ai rajouté un calculate (pas dans mon userform, mais juste avant son affichage car sinon, il fallait que je réaffiche...) et ÇA FONCTIONNE!!! 😀
Merci à tous pour votre aide et à la prochaine 😎

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 8 Octobre 2007

• #17

Re : Comment forcer le calcul d'une cellule en VBA

Re

eh bien il fallait bien tout ça

Calculate hein !!

je ne sais pas si j'y aurais pensé !!

Donc ça y est, et

Le canard est toujours vivant

bravo JNP

 

Vote positif 0 Vote négatif

JNP

XLDnaute Barbatruc

• 8 Octobre 2007

• #18

Re : Comment forcer le calcul d'une cellule en VBA

pierrejean à dit:

Re

eh bien il fallait bien tout ça

Calculate hein !!

je ne sais pas si j'y aurais pensé !!

Donc ça y est, et

Le canard est toujours vivant

bravo JNP

Cliquez pour agrandir...

Merci, mais toutes vos suggestions m'ont servi. Encore merci 😎

 

Vote positif 0 Vote négatif

B

benoit.frn

XLDnaute Nouveau

• 18 Juillet 2012

• #19

Re : Comment forcer le calcul d'une cellule en VBA

Bonjour,
Je travaille sur un gros fichier Excel (75 onglets, en moyenne 700 lignes par onglet)
J'ai un problème sur une feuille qui ne veut pas se calculer automatiquement, j'ai beau essayer vos techniques décrites précédemment, je n'arrive à rien et je suis obligé de me taper toutes les lignes, F2+Entrée pour calculer.
Est-il possible d'écrire sous Visual Basic une sorte de rafraichissement de l'onglet pour tout recalculer automatiquement ?
Merci pour vos réponses,

Benoit

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 18 Juillet 2012

• #20

Re : Comment forcer le calcul d'une cellule en VBA

Bonsoir

A tout hasard
essayes cette macro

Code:

sub a()
Application.EnableEvents=true
end sub

Sinon un fichier exemple reproduisant le phénomène ne ferait pas tâche dans ce fil ... 😉

 

Vote positif 0 Vote négatif

B

benoit.frn

XLDnaute Nouveau

• 19 Juillet 2012

• #21

Re : Comment forcer le calcul d'une cellule en VBA

Merci pour la réponse ! Mais j'ai essayé, ça ne marche pas..
J'ai effectivement pensé ajouter le fichier en ligne mais il est trop gros et la feuille concernée par mon problème pioche dans une dizaine de feuilles différentes..

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 19 Juillet 2012

• #22

Re : Comment forcer le calcul d'une cellule en VBA

Re


Il suffit d'alléger ton fichier suffisamment 😉
Deux feuilles suffisent, et 20 lignes dans chaque d'elles, avec des données fictives ou anonymisées, ton classeur zippé
(Clic-droit sur ton *.xls puis choisir Envoyer vers Dossiers compressés )

Et normalement tu auras alors un fichier exemple à joindre à ta discussion

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 19 Juillet 2012

• #23

Re : Comment forcer le calcul d'une cellule en VBA

Bonjour benoit.frn, Jean-Marie 🙂

Ceci doit forcer le recalcul des formules dans la feuille active :

Code:

Sub ForceCalcul()
Dim plage As Range, cel As Range
Application.ScreenUpdating = False
Application.EnableEvents = False
Application.Calculation = xlCalculationManual
On Error Resume Next
Set plage = ActiveSheet.UsedRange.SpecialCells(xlCellTypeFormulas)
For Each cel In plage
  cel.Formula = cel.Formula & "+µµµ"
Next
plage.Replace "+µµµ", "", xlPart
Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True
End Sub

A+

 

Dernière édition: 19 Juillet 2012

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 19 Juillet 2012

• #24

Re : Comment forcer le calcul d'une cellule en VBA

Re,

Essayez aussi tout benoîtement :

Code:

Sub ForceCalcul()
Cells.Replace "=", "µµµ", xlPart
Cells.Replace "µµµ", "="
End Sub

A+

 

Vote positif 0 Vote négatif

B

benoit.frn

XLDnaute Nouveau

• 19 Juillet 2012

• #25

Re : Comment forcer le calcul d'une cellule en VBA

Merci pour vos réponses ! ça marche bien mais je me rends compte que ce n'est pas adapté à mon cas. Je ne travaille que depuis une semaine sur ce fichier que je n'ai pas moi-même conçu donc je ne saisis pas encore toutes les dépendances dans chacune des feuilles. En l’occurrence job75, votre code actualise chacune des lignes au fur et à mesure mais certaines de mes cellules du début de la feuille dépendent d'autres en fin de feuille, d'où bug...

@staple1600, ce n'est pas par manque de volonté et je comprends que vous joindre un fichier aiderait mais je ne peux vraiment pas le résumer. Les cellules pour lesquels le calcul ne se fait pas sont assez loin dans la feuille, prennent des références au début, et ne concernent que de simples additions qui ne se calculent pas proprement, allez savoir pourquoi... Alors que d'autres se font très bien ! J'espère avoir été assez clair dans mes explications 🙂
Je vais essayer d'appliquer la macro de job75 que pour certaines cellules. Est-il possible de la lancer que pour des cellules sélectionnées par hasard ?

Un grand merci

 

Vote positif 0 Vote négatif

B

benoit.frn

XLDnaute Nouveau

• 19 Juillet 2012

• #26

Re : Comment forcer le calcul d'une cellule en VBA

Ok c'est bon j'ai trouvé, pas très compliqué d'appliquer ça uniquement aux cellules sélectionnées.
ça marche, merci à tous les deux !

 

Vote positif 0 Vote négatif