Calcul automatique de la feuille

T

thebenoit59

XLDnaute Accro

• 3 Mai 2016

• #2

Re : Calcul automatique de la feuille

Bonjour Joe.
Dans tes différentes macros, ne mets-tu pas le Calcul en Manuel sans le replacer en Automatique ?

 

Vote positif 0 Vote négatif

joedu31

XLDnaute Nouveau

• 3 Mai 2016

• #3

Re : Calcul automatique de la feuille

Ah oui, en effet ça peut venir de ceci Tu fais allusion à la focntion ci après?
Je vais reprendre toutes mes macros pour voir, si il y en a dedans

Application.Calculation = xlCalculationManual
Application.Calculation = xlCalculationAutomatic

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif

T

thebenoit59

XLDnaute Accro

• 3 Mai 2016

• #4

Re : Calcul automatique de la feuille

Oui, c'est bien à ça que je fais allusion .
J'ai eu le même soucis que toi, alors j'ai travaillé un peu différemment.
En début de procédure j'utilise ceci :

Code:

Sub Disable_Events()
    With Application
    .Calculation = xlCalculationManual
    .ScreenUpdating = False
    .EnableEvents = False
    .DisplayAlerts = False
    .DisplayStatusBar = False
    End With
End Sub

Et en fin de procédure je place ceci :

Code:

Sub Enable_Events()
    With Application
    .Calculation = xlCalculationAutomatic
    .ScreenUpdating = True
    .EnableEvents = True
    .DisplayAlerts = True
    .DisplayStatusBar = True
    End With
End Sub

Et comme ça, si je dois utiliser Exit Sub je fais ainsi :

Code:

 If "blablabla" <> "cacaca" Then Enable_Events: Exit Sub

 

Vote positif 0 Vote négatif

joedu31

XLDnaute Nouveau

• 3 Mai 2016

• #5

Re : Calcul automatique de la feuille

Ok mercii Benoit, je regarde tous ça.

Y aurait pas une fonction qui permettrait de rechercher la formule en question dans les macros (tous les modules, feuilles) ?

 

Vote positif 0 Vote négatif

T

thebenoit59

XLDnaute Accro

• 3 Mai 2016

• #6

Re : Calcul automatique de la feuille

Je ne pense pas, il faudrait que tu fasses du pas à pas.

 

Vote positif 0 Vote négatif

joedu31

XLDnaute Nouveau

• 3 Mai 2016

• #7

Re : Calcul automatique de la feuille

D'accord, merci bien
Bonne journée

 

Vote positif 0 Vote négatif