Question : Comment copier la ligne couleur de diagramme et s'appliquer dessus sur le titre de diagramme (Excel 2007/VBA)

Bonjour les experts, le

I ont un groupe de ligne diagrammes inclus en une feuille d'Excel, et chaque ligne a un code différent de color.
Using VBA, je dois faire une boucle par chaque diagramme, copier la couleur de la ligne diagramme et l'appliquer sur le diagramme title.

Could que quelqu'un satisfont suggérer le code de VBA pour le you

 d'above.

Thank class= " lastRow de
>Attachments de " nom " de class= de
class= " valeur " de
>
class= " fileInfo " de
le title= " de " nom de fichier de class= " de Before.jpg le class= (151 KBS)  Javascript de href= " de " attachmentDetails de class= " de (type de dossier détails)  
class= " description " de
Diagrammes avant de courir le macro
target= " _blank " de " http://filedb.experts-exchange.com/incoming/2010/08_w35/340216/Before.jpg " de href= de " attachmentLink " de class= de largeur de style= de de http://filedb.experts-exchange.com/incoming/2010/08_w35/t340216/Before.jpg de « src=
le class= de
de >
>
class= " fileInfo " de
le title= " de " nom de fichier de class= " de After.jpg le class= (151 KBS)  Javascript de href= " de " attachmentDetails de class= " de (type de dossier détails)  
class= " description " de
Diagrammes après fonctionnement du macro
target= " _blank " de " http://filedb.experts-exchange.com/incoming/2010/08_w35/340217/After.jpg " de href= de " attachmentLink " de class= de largeur de style= de de http://filedb.experts-exchange.com/incoming/2010/08_w35/t340217/After.jpg de « src=
le class= de
de >
class= de

Réponse : Comment copier la ligne couleur de diagramme et s'appliquer dessus sur le titre de diagramme (Excel 2007/VBA)

Cela a fonctionné quand j'ai examiné.

ChartManip secondaire ()
Faible mi-bande comme cahier de travail
Faible Mme comme feuille de travail
Faible mCh comme ChartObject


Placer la mi-bande = le ThisWorkbook
Placer Mme = la mi-bande. Feuilles de travail (« Sheet1 »)
Pour chaque mCh dans ms.ChartObjects
    mCh.Chart.ChartTitle.Font.ColorIndex = mCh.Chart.SeriesCollection (1).Border.ColorIndex

Prochain mCh
Sous-marin d'extrémité
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
    •
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
    •
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
    •
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
    •
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
    •
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
    •
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
    •
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
    •
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
    •
  •  Winzip 12 issues de secours du travail ?
    •
     
    programming4us programming4us