XL 2010 Tableau excel mise à jour lente

atd49

XLDnaute Nouveau
Bonjour

J'ai créé un planning sous excel avec une multitude de mise en forme conditionnelle et cela implique que mon planning est lent à ce mettre à jour lors de saisies
Je pense que ce sont les mises en forme qui sont le problème. Y a-t-il des solutions?
Le principe du planning est de mettre dans des cellules appropriées un n° des taches (voir onglet tache) et ces cellules se mettent automatiquement en forme suivant les conditions fixées, idem pour des cellules concernant le matériel

Bonne journée
 

Pièces jointes

  • 040520 projet_planning.xlsm
    808.7 KB · Affichages: 12

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Atd,
Effectivement il y a de la MFC ! :)
en PJ un essai ... sans MFC donc un peu plus rapide.
Cependant je n'ai pas pu copier les couleurs des MFC, je n'ai trouvé que copier ces couleurs si elles étaient dans l'index.
Donc j'ai mis des couleurs arbitraires.
La palette est dans l'onglet Codes. Chaque Nom est associé à une couleur;
On peut modifier cette palette mais il faut repasser la macro ColorePage sur chaque page pour remettre à jour.
A essayer pour voir si cela vous va.
 

Pièces jointes

  • 040520 projet_planning (1).xlsm
    843.4 KB · Affichages: 5

sylvanu

XLDnaute Barbatruc
Supporter XLD
Dans chaque feuille Sxx il faut le code pour détecter un changement de valeur d'une cellule :
VB:
Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo FinChange
' ex MFC : $A$167:$AT$170;$A$55:$E$166;$H$55:$AT$166;$F$55:$G$134;$A$4:$AT$54
     Set Plage = Application.Union(Range("$A$167:$AT$170"), Range("$A$55:$E$166"), Range("$H$55:$AT$166"), Range("$F$55:$G$134"), Range("$A$4:$AT$54"))
    If Not Intersect(Target, Plage) Is Nothing Then
         Colore (Target.Address)
    End If
FinChange:
End Sub
Ensuite c'est simple, tout est dans GestionCouleurs.
Quand on clique sur une cellule, on regarde si le contenu de celle ci est référencés dans Code Colonne A.
Si on le trouve alors on copie la couleur.
 

Discussions similaires

Statistiques des forums

Discussions
311 724
Messages
2 081 936
Membres
101 844
dernier inscrit
pktla