• Initiateur de la discussion Initiateur de la discussion Oudjat
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

O

Oudjat

Guest
Voila mon application que j'ai creer deviens un peu plus lourde et recalcul sans arret y a til un moyen d'alleger c'est "recalcul"

je suis preneur de toute idée car ca deviens tres lents


merci

oudjat
 
Re Oudjat

Une fois que tu auras lu ce fil donc "Macro tres tres lente (15 secondes pour faire une action sur 16*5 cellules)" finalement ma solution finale pour Cyb-cd n'a pas pu être mise sur le forum...

Donc ici la méthode :
Private Sub Workbook_Open()
Application.Calculation = xlCalculationManual
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Calculation = xlCalculationAutomatic
End Sub
Ne pas oublier de remettre en sortant, sinon Excel reste en Mode Manuel (Menu / Outils / Option / Calculation)

Dans les modules (les macros) si on a besoin d'avoir un Calcul à un moment précis on met l'instruction :
Calculate

On peut même être très pointu sur cette instruction qui seule équivaut à dire :
Application.Calculate '(donc Excel calcule partout)
mais on peut préciser :
Worksheets("Toto").Calculate '(donc Excel calcule que sur la feuille "Toto")
et même :
Worksheets("Toto").UsedRange.Columns("A:C").Calculate '(donc Excel calcul juste là où il faut à la cellule près si il le faut!!)

Voilà avec çà ton appli devrait tourner du Tonnerre de Feu !!

Bon App
@+Thierry
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
2
Affichages
337
Réponses
5
Affichages
406
Retour