Bonjour
voici la structure de mon code vba excel
Si le bloc N°01 ou N°02 contient une erreur alors les code suivant
Application .Calculation = xlCalculationManual
Application.EnableEvents = False
Application.ScreenUpdating = False
Application.DisplayAlerts = False
sont toujours désactivé et dans cette situation je suis obligé de redémarrer Excel pour les activés.
SVP est ce qu'il y a un code qui gère cette situation .
Salutations.
voici la structure de mon code vba excel
VB:
sub test ()
'==============Déclarations Des Variables==============
With Application
.Calculation = xlCalculationManual
.EnableEvents = False
.ScreenUpdating = False
.Application.DisplayAlerts = False
End With
'===============Bloc N°01=========================
if .........then.......
end if
'===============Bloc N°02==========================
for i=1 to n
nexti
'=================Fin Du Code=====================
With Application
.Calculation = xlCalculationAutomatic
.EnableEvents = True
.ScreenUpdating = True
.Application.DisplayAlerts = True
End With
end subSi le bloc N°01 ou N°02 contient une erreur alors les code suivant
Application .Calculation = xlCalculationManual
Application.EnableEvents = False
Application.ScreenUpdating = False
Application.DisplayAlerts = False
sont toujours désactivé et dans cette situation je suis obligé de redémarrer Excel pour les activés.
SVP est ce qu'il y a un code qui gère cette situation .
Salutations.