J'ai ce code pouvez-vous m'aider pour éditer le code et seulement .showvalue quand est-il différent de 0? Sub test() Dim myChart As ChartObject 'A "ChartObject" contains a Chart, in which the "SeriesCollection" resides Dim chartSeries As Series 'Multiple "Series" can be found in a "SeriesCollection" Dim scPoint As Point Set myChart = ActiveSheet.ChartObjects("Chart 1") Set […]
Je ne suis pas sûr si je rédige un libellé correct, mais j'aimerais que mes arrays de bar soient tous à la même hauteur quel que soit le maximum. valeur. Par exemple, si sur une barre, voyez mon max. La valeur sur l'axe Y est 7 et l'autre barre représente le maximum. La valeur sur […]
Pour gagner du time, j'ai ajouté une image du graphique que je cherche et ma question est simple: Comment puis-je organiser datatables efficacement dans Excel pour présenter datatables de cette façon? J'ai 2 régions: EMEA et APJ, J'ai 2 produits: Prod 1 et Prod 2 Pour chaque région (catégorie principale), je souhaite présenter le renouvellement, […]
J'ai une table excel avec plusieurs colonnes et lignes. J'ai écrit ce code simple pour générer un tableau de ligne de ma table: Sub DrawLine() Dim cht As ChartObject For Each cht In Worksheets(Sheets.Count).ChartObjects cht.Chart.Type = xlLine Next cht End Sub Cependant, lorsque j'exécute ce code, je ne peux pas voir mon tableau, sauf si […]
Voici mon code, Public Sub createdonutchart(Chartrange1 As Ssortingng, chartrange2 As Ssortingng, L1 As Integer, T1 As Integer, W1 As Integer, H1 As Integer, targetsheet As Worksheet, charttitle As Ssortingng) Dim oChart As Excel.Chart Dim MyCharts As Excel.ChartObjects Dim MyCharts1 As Excel.ChartObject MyCharts = targetsheet.ChartObjects MyCharts1 = MyCharts.Add(L1, T1, W1, H1) oChart = MyCharts1.Chart With oChart […]
Problème: J'essaie de comprendre comment je peux graver le nombre de projets actifs au cours d'une année par un employé de excel. Je suis familier avec Pivot Tables et je ne savais pas si c'était quelque chose que je pourrais accomplir avec datatables que j'ai ou si je devais élaborer une formule pour get datatables […]
Table 1 – E(40%),C(20%),D(20%),A(10%), B(10%), Table 2 – D(60%),C(15%),A(15%),B(10%) Table 3 – E(10%),F(40%),C(20%),A(10%), B(10%),D(10%), Supposons que je prenne le tableau 3 comme tableau de base (variable maximale). Comment garder la même couleur pour A, B, C, D dans tous les charts, car Excel donne une couleur selon le poids de la légende (c'est-à-dire que E, […]
Date Issue redmeption App Date Issue redmeption App 21-Nov 891 200 523 28-Nov 660 179 302 22-Nov 607 125 423 29-Nov 712 165 420 23-Nov 456 165 422 30-Nov 499 128 331 24-Nov 510 115 391 1-Dec 596 170 392 25-Nov 525 120 400 2-Dec 573 169 397 26-Nov 585 158 396 3-Dec 450 120 […]
J'essaie de copyr 24 charts d'une feuille de calcul Excel vers un document Word dans une command particulière. C'est le code que j'utilise: Sub ChartsToWord() Dim WDApp As Word.Application Dim WDDoc As Word.Document Dim iCht As Integer Dim Msg As Ssortingng Set WDApp = CreateObject("Word.Application") Set WDDoc = WDApp.Documents.Add For iCht = 1 To ActiveSheet.ChartObjects.Count […]
Je vais définir la couleur et le nom de trois séries avec le tableau de lignes dans Apint POI. Selon l'exemple suivant, les noms de chaque ligne ne sont que les series 1 , series 2 et series 3 et les colors sont automatiquement atsortingbuées. Comment modifier la couleur et le nom de celles-ci sur […]