Bonjour à vous tous
Je voulais savoir si une fois qu'un fichier est ouvert en mode de calcul manuel, grâce à une macro
Private Sub Workbook_Open()
Dim StatusCalculation As Integer
StatusCalculation = Application.Calculation
Application.Calculation = xlCalculationManual
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Calculation = StatusCalculation
End Sub
On pouvait faire en sorte que les autres fichiers ouverts, restent en mode de calcul automatique pendant tout le processus et pas seulement à la fermeture.
Merci
Cordialement
SPAGE