Macro en arrière plan, ou comment arrêter la mise à jour de l'affichage

[Signy]

Bonjour,

J'ai un petit problème. J'ai fait une jolie feuille, un peu lourde (770 Ko).
Elle a beaucoup de calcul à faire, affiche des images, recherche dans des tables.

Mon problème : quand je rentre une valeur, j'attends 10 secondes qu'elle recalcule et affiche tout.

Je voudrais donc désactiver l'affichage avec une macro. Ainsi, je n'aurai qu'à cliquer sur un bouton pour mettre à jour l'affichage.

Précision : la feuille fait aussi des calculs itératifs, je ne peux donc pas désactiver le calcul automatique et utiliser F9.

Cordialement,
Signy

 

[Dull]

Re : Macro en arrière plan, ou comment arrêter la mise à jour de l'affichage

Salut Signy, le Forum

Éventuellement à essayer en début de Macro

Sub EssAi()
With Application
    .ScreenUpdating = False
    .Calculation = xlCalculationManual
        [COLOR=Green]'TonCode[/COLOR]
    .Calculation = xlCalculationAutomatic
    .ScreenUpdating = True
End With
End Sub

A Tester :)

Bonne Journée

 

[kjin]

Re : Macro en arrière plan, ou comment arrêter la mise à jour de l'affichage

Bonjour,

Précision : la feuille fait aussi des calculs itératifs, je ne peux donc pas désactiver le calcul automatique et utiliser F9.

Sub EssAi()
With Application
    .ScreenUpdating = False
    .[COLOR="Blue"]Calculation = xlCalculationManual[/COLOR]
        [COLOR=Green]'TonCode[/COLOR]
    .[COLOR="Blue"]Calculation = xlCalculationAutomatic[/COLOR]
    .ScreenUpdating = True
End With
End Sub
[/QUOTE]
:p:D
A+
kjin

 

[Signy]

Re : Macro en arrière plan, ou comment arrêter la mise à jour de l'affichage

Merci pour votre aide.

Signy