Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1045 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA Excel] Colorier les objets d'un graphique

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA Excel] Colorier les objets d'un graphique

n°1373935
Mafiou
Posté le 24-05-2006 à 11:35:43  profilanswer
 

Bonjour,  
 
Je suis débutant en VBA. J'aimerai pouvoir colorier les objets d'un graphique selon une valeur prédéfinie.  
 
Voici mon code :  
Sub colorier()  
 
Dim nbval, a, i, col As Integer  
 
ActiveSheet.ChartObjects("Graphique 3" ).Activate  
 
 
nbval = ActiveSheet.UsedRange.Rows.Count  
 
MsgBox nbval  
 
 
For a = 1 To nbval  
val_barre = Range("g" & a).Value  
 
Debug.Print val_barre  
 
 
 
If val_barre = "Utiles" Then  
col = 50  
Else  
col = 3  
End If  
 
ActiveChart.SeriesCollection(1).Points(a).Interior.ColorIndex = col  
 
Next  
 
End Sub  
 
Ce code fonctionne à moitié. Il me différencie certains de mes objets, mais ils ne correspondent pas aux enregistrements de mon tableau.  
Si je trie mon tableau avec lequel j'ai crée le graphique selon mon critère de couleur ( ici Utiles et Autres), et que je selectionne par exemple tous mes enregistrements "Utiles", ils m'affichent sur le graphique tous ces enregistrements, mais les couleurs ne sont pas celle associé à ce critère. J'ai objets des deux couleurs...

mood
Publicité
Posté le 24-05-2006 à 11:35:43  profilanswer
 

n°1374757
kiki29
Posté le 25-05-2006 à 08:53:15  profilanswer
 

Utilise le macro recorder cela te donnera une idée du code associé qu'il te restera à modifer selon tes désiderata

n°1376757
Mafiou
Posté le 29-05-2006 à 15:42:41  profilanswer
 

Je ne vois pas en quoi l'enregistreur de macro pourrait m'aider...

n°1376822
tegu
Posté le 29-05-2006 à 16:41:26  profilanswer
 

Les macro sont modifiables et sont codées en VBA...

n°1377934
Mafiou
Posté le 31-05-2006 à 09:44:08  profilanswer
 

:)
 
Tegu, j'ai crois avoir déjà mis mon code en VBA. Mon problème n'est pas de savoir comment on fait pour coder...puisque j'ai dejà un bout de code.  
Mais j'aimerai connaitre les changements à effectuer dans ce code,afin qu'il fonctionne parfaitement.
J'ai l'impression que les objets de mon graphique ne sont pas traité dans le même ordre que les enregistrements de mon tableau.

n°1397151
Mafiou
Posté le 29-06-2006 à 12:37:35  profilanswer
 

Personne n'a une idée à me proposer? Parce que la je cale depuis un bon bout de temps...

n°1397161
jpcheck
Pioupiou
Posté le 29-06-2006 à 13:11:33  profilanswer
 

Mafiou a écrit :

Personne n'a une idée à me proposer? Parce que la je cale depuis un bon bout de temps...


et plutot que d'appliquer une macro, tu fais une fonction condition sur tes cellules ?
pas nécessairement besoin de VB pour ca à ce moment là

n°1401917
Mafiou
Posté le 06-07-2006 à 12:55:41  profilanswer
 

Jpcheck, si j'applique une couleur a ma cellule avec une fonction "SI", les objets de mon grpahique pourront prendre la même couleur que celle de la cellule?

n°1401986
jpcheck
Pioupiou
Posté le 06-07-2006 à 14:35:40  profilanswer
 

Mafiou a écrit :

Jpcheck, si j'applique une couleur a ma cellule avec une fonction "SI", les objets de mon grpahique pourront prendre la même couleur que celle de la cellule?


ben en principe oui avec la methode interior.colorindex de ta cellule injectée dans la couleur de ton graphe.


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA Excel] Colorier les objets d'un graphique

 

Sujets relatifs
Redessiner l'interface graphiqueFiltre avec critere variable Excel
Import Fichier Excel dans Sql ServerConserver la valeur d'une CheckBox (VBA)
lancer un log a partir d'excel (macro)[RESOLU] Comment lancer excel en mode batch ?
Problème sur Macro ExcelExcel: TDC
Excel : Question élementaireAssocier une combobox à une cellule excel
Plus de sujets relatifs à : [VBA Excel] Colorier les objets d'un graphique


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR