bonjour,
je vous communique une petite problematique, j'ai un tableau croise dynamique et sur le tableau j'ai besoin de mettre une mise en forme avec couleurs avec des conditions sauf que le croisé dynamique bouge selon les donnes par exemple j'ai commence par mettre le code VBA pour coulorie Q1 en rouge.
ci dessous un code que j'ai deja essaye d'optimisé à partir d'une macro mais j'arrive pas je suis desole je suis un debutant VBA
ci dessous mon code
je vous laisse le fichier ci joint en cas de besoin Quartile.xlsm
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Sub CouleurQ() ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotSelect "Q1", _ Range("A4:C7").Select With Selection.Interior .Pattern = xlSolid .PatternColorIndex = xlAutomatic .Color = 255 .TintAndShade = 0 .PatternTintAndShade = 0 End With End Sub
Cdt,
ouga
Partager