Bloquer certains calcul

[LocSta]

Salut à tous.
Je voulais savoir s'il était possible de bloquer le calcul des formule sur certaines feuilles.
Par exemple dans un document les formules de toutes les feuilles s'éxécutent sauf celles de la feuille 2 et de la feuille 3.
Est ce possible???

Si oui peut on lancer à l'aide d'un bouton (d'une macro) les formules des feuilles 2 et 3.

Merci

 

[tirex28]

Re : Bloquer certains calcul

Bonjour,

Pour desactiver le calcul automatique d'une feuille en particulier:

WorkSheets(1).EnableCalculation = False

Pour recalculer la feuille:

WorkSheets(1).EnableCalculation = True
WorkSheets(1).Calculate

Cordialement,

Tirex28/

 

[LocSta]

Re : Bloquer certains calcul

Merci Tirex28, j'vais tester ça.

 

[LocSta]

Re : Bloquer certains calcul

J'ai essayer mais j'ai pas l'impression que ça soit efficace
Enfét j'ai 3 feuille qui contienne des formules qui mette un certain temps
Avant d'avoir ces feuilles tout marché tres bien
Il n'est pas nécessaire que les calculs des 3 feuille soit actualiser toute les 5mins, une fois par jours c'est suffisant
Le probléme c'est que quand je desactive les calculs automatiques, mais mise en forme conditionnel des autres feuilles ne fonctionne plus.
Je n'arrive pas à faire en sorte que les calculs automatique soit actifs sur toutes mes feuilles sauf ces 3 là ("BD Machines","BD Clients","BD Affaires") pour lesquelles un bouton serai nécessaire pour lancer le calcul des formules

J'avais essayer ça mais ça ne marche pas:
Private Sub CommandButton2_Click()
Worksheets("Données").EnableCalculation = True
Worksheets("Principal").EnableCalculation = True
Worksheets("Synthése").EnableCalculation = True
Worksheets("Notice").EnableCalculation = True
Worksheets("Saisie").EnableCalculation = False
Worksheets("Archives").EnableCalculation = False
Worksheets("BD Machines").EnableCalculation = False
Worksheets("BD Clients").EnableCalculation = False
Worksheets("BD Affaires").EnableCalculation = False
End Sub

Private Sub CommandButton3_Click()
Worksheets("BD Machines").EnableCalculation = True
Worksheets("BD Machines").Calculate
Worksheets("BD Clients").EnableCalculation = True
Worksheets("BD Clients").Calculate
Worksheets("BD Affaires").EnableCalculation = True
Worksheets("BD Affaires").Calculate
Worksheets("Saisie").EnableCalculation = True
Worksheets("Saisie").Calculate
Worksheets("Archives").EnableCalculation = True
Worksheets("Archives").Calculate
End Sub

 

[LocSta]

Re : Bloquer certains calcul

J'ai mis "les 3 feuilles dérangeante" dans un autre classeur et j'ai mi un lien avec l'ancien classeur du coup il suffit d'ouvrir le nouveau classeur pour lancer les calculs, mon pb est résolu 🙂