calcul automatqiue

[andré]

Salut,

Dans un assez gros classeur (20 Mo) je souhaite pouvoir limiter le calcul automatqiue à la seule feuille sur laquelle je travaille, afin d'accélérer les calculs.
J'ai bessoin de travailler en calcul automatique car le résultat de la cellule précédente influence mon choix pour la cellule suivante.
De plus certaines cellules ont des liaisons par RECHERCHEV.

Quelqu'un a-t-il une solution ?

Ândré.

 

[Ti]

utilise l'événement Worksheet_Activate dans lequel tu places le code suivant. Il faut mettre cette procédure dans le code de Thisworkbook.

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim Ws As Worksheet
For Each Ws In ThisWorkbook.Worksheets
Ws.EnableCalculation = Ws.Name = Sh.Name
Next Ws
End Sub

 

[andré]

Merci Ti, j'essaie sur le champ.

Ândré.