Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Exécution lente des macros

halecs93

XLDnaute Impliqué
Bonjour à tout le monde,

J'ai deux évènements correspondant à la l'onglet "planning" qui, je crois ralentissent les calculs.

Il s'agit de :

Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
et
Worksheet_Change(ByVal Target As Range)

Existerait il un moyen d'accélérer le traitement du classeur ?

Merci beaucoup.
 

Pièces jointes

  • PLANNING - exceldownoads - accelerer macro.xlsm
    453.6 KB · Affichages: 18
Trier par date Trier par votes

Phil69970

XLDnaute Barbatruc
Bonjour à tous

@halecs93

Tu as 3652 règles sur la feuille planning

VB: 
Sub ListeMFC
Dim Ws As Worksheet
Set Ws = ActiveSheet  
Debug.Print ws.Cells.FormatConditions.count & " règles sur la feuille " & Ws.Name
End Sub

*Code "Sortie du tiroir des archives anglophones de Staple "

C'est juste énorme et surement pas loin d'un record !!

Quoi faire ?
Virer toutes les MFC comme le dit Simply

VB: 
Sub SupprimerMFC()
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In ThisWorkbook.Sheets
    Ws.Cells.FormatConditions.Delete
Next
End Sub

Et refaire que les MFC UTILES

Bonne lecture
 
Vote positif 0 Vote négatif

TooFatBoy

XLDnaute Barbatruc
Phil69970 à dit:
Tu as 3652 règles sur la feuille planning

C'est juste énorme et surement pas loin d'un record !!
Cliquez pour agrandir...
Je confirme qu'un grand nombre de MFC ralenti aussi bien les calculs que les macros...

J'ai déjà vu un tout petit peu plus de 3652 règles ici :

XL 2016 - Compter les MFC d'une feuille

Bonjour, Y a-t-il moyen de savoir combien de MFC il y a dans une feuille d'un classeur ?
excel-downloads.com
Et même encore un peu plus :

Microsoft 365 - [RESOLU] format de cellule fonction liste déroulante (MFC trop lourde)

Bonjour le forum ! En pleine reconstruction d'un planning sur un atelier, et afin de rendre plus simple la lecture de l'engin, je souhaite appliquer des formats en fonction des codes horaires utilisés. Rien de plus simple me direz-vous ... les bonnes vieilles MFC Sauf que ce fichier est utilisé...
excel-downloads.com
 
Dernière édition:
Vote positif 0 Vote négatif

halecs93

XLDnaute Impliqué
Sans doute dû a de malheureux et bien maladroits copier-coller ?
 
Vote positif 0 Vote négatif

TooFatBoy

XLDnaute Barbatruc
halecs93 à dit:
Il y aurait une autre solution pour compter les cellules colorées ?
Cliquez pour agrandir...
C'est la fonction dont je parlais.

Je n'ai pas regardé si on pouvait trouver une autre solution pour compter les couleurs.
Mais peut-être est-il possible de utiliser une fonction mais plutôt une macro qui ne se déclenche que sur un événement particulier (et donc moins fréquemment).
Ou peut-être peut-on remplacer le comptage des couleurs par autre chose.


halecs93 à dit:
Du coup, je n'arrive pas à réduire le nombre des MFC.... help
Cliquez pour agrandir...
Pourtant sur la capture d'écran on voit des choses "mutualisables".

Quand tu supprimes toutes les MFC, est-ce que ça résout ton problème de lenteur ?
 
Vote positif 0 Vote négatif

halecs93

XLDnaute Impliqué
Carrément, oui.

Je pense ne pas avoir écrit correctement les MFC (à force de copier-coller, encore une fois). Et j'ai du mal à corriger.
 
Vote positif 0 Vote négatif

TooFatBoy

XLDnaute Barbatruc
Tu as une formule de MFC =B3="" qui s'applique uniquement à =$B$3

- Tu peux déjà l'appliquer à =$B$3:$O$404

- Ensuite toutes les formules faisant la même chose deviennent inutiles.
(par exemple : =D150="" appliquée à =$D$150)
 
Dernière édition:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

N
  • Question
Microsoft 365 Imbrication de deux formule Worksheet_BeforeDoubleClick
Réponses
1
Affichages
167
Nathan027
N
U
  • Question
Autres [RESOLU] Déclaration de variable
Réponses
5
Affichages
233
un internaute
U
N
  • Résolu(e)
Microsoft 365 Ajouter une condition dans une VBA
Réponses
2
Affichages
229
Nathan027
N
T
  • Résolu(e)
XL 2010 VBA - Fonction double clics à opérations multiples
Réponses
2
Affichages
183
Titi456
T
U
  • Question
Autres Comment puis-je m'en sortir?
Réponses
2
Affichages
262
un internaute
U
J
  • Question
XL 2019 recuperer plage de cellule sur feuille differente
Réponses
2
Affichages
369
juju91
J
A
  • Résolu(e)
Microsoft 365 Vider des listes déroulantes en cascade
Réponses
6
Affichages
355
Franc58
F
T
  • Résolu(e)
Microsoft 365 macro sur cellule nom onglet (formule) pour ouvrir l'onglet correspondant
Réponses
8
Affichages
427
Tartineaunut
T
A
  • Question
Microsoft 365 Slicer - supprimer le menu contextuel ou la possibilité de supprimer le filtre
Réponses
1
Affichages
372
xUpsilon
S
  • Question
Microsoft 365 VBA pour copier une une des données d'une ligne à une autre
Réponses
3
Affichages
236
salma_hayek
S
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…