Tag: 图表

Excel VSTO AddIn – 从select中获取图表对象

我将如何将用户的select转换为VSTO Excel加载项中的图表对象(如Excel.Chart )。 我一直在尝试使用这样的东西(同时在Excel中select一个图表对象): Dim chart as Excel.Chart = CType(Globals.ThisAddIn.Application.Selection, Excel.Chart) 但是,这会引发InvalidCastException 。 我似乎无法find任何有关如何让用户select图表,然后在VSTO加载项中修改所选图表的文档。

如何定义从Excel导出到PowerPoint时的图表顺序?

我创build了所有图表所在的工作表,然后使用macros将图表导出到PowerPoint中。 如何定义图表插入到演示文稿中的顺序? 我试图通过命名他们图1,图2等,但它没有奏效。 这里是macros代码: 'First we declare the variables we will be using Dim newPowerPoint As PowerPoint.Application Dim activeSlide As PowerPoint.Slide Dim cht As Excel.ChartObject 'Look for existing instance On Error Resume Next Set newPowerPoint = GetObject(, "PowerPoint.Application") On Error GoTo 0 'Let's create a new PowerPoint If newPowerPoint Is Nothing Then Set newPowerPoint = […]

显示百分比列与数字

我需要在excel 3-d集群列图中显示数值及其各自的百分比。 数字:30000,10100,280000,560000 百分比:20.02%,34%,50.12%,70.28% 数字值非常大,其百分比就像框一样。 我已经尝试了很多,以完成这一切,但无法解决。 我也试过这里给出的解决scheme(没有工作) http://excelribbon.tips.net/T007888_Numeric_Value_and_Percentage_Value_in_a_Graph_Column.html

更新不同系列的图表

我在Excelmacros中使用这段代码来强制更新大量覆盖图表: Set sht = ActiveSheet For Each co In sht.ChartObjects co.Activate For Each sc In ActiveChart.SeriesCollection sc.Select temp = sc.Formula MsgBox temp sc.Formula = "=SERIES(,,1,1)" sc.Formula = temp Next sc Next co 代码运行良好,但在一个包含5个元素(而不是4个)的图表上,我得到了一个错误: sc.Formula = "=SERIES(,,1,1)" 你可以build议我如何修改代码,以使其适用于我所有的图表?

设置图表系列颜色以匹配类别单元格颜色VBA

我需要VBAmacros,这将匹配我的类别背景颜色与折线图系列颜色。 现在我不使用最好的方式,因为我正在应用下面的代码 它将图表系列颜色设置为与源单元格颜色相同。 (例如在图片上) 但是我想要这个macros从类别的单元格(2009,2010,2011代表),而不是源单元格的颜色。 我找不到简单而直接的方法。 我为源单元格macros设置背景颜色来匹配类别的颜色,然后我把白色的颜色与条件格式的源单元格的顶部。 所以只有类别是多彩的,源单元格是白色的。 想知道是否有更好的方法做到这一点。 (图片上的最终结果,匹配系列颜色的类别名称) Dim oChart As ChartObject Dim MySeries As Series Dim FormulaSplit As Variant Dim SourceRange As Range Dim SourceRangeColor As Long 'Loop through all charts in the active sheet For Each oChart In ActiveSheet.ChartObjects 'Loop through all series in the target chart For Each MySeries In […]

使用VBA和子例程创build图表

我正在使用名为Team1-Team8的选项卡中的数据创build图表。 我正在为每个团队创build图表,但是我无法将图表分配到名为“Team a – Charts”的每个团队选项卡中。 下面是迄今为止,我只有Team A.My参数表中的代码,列B具有图表选项卡的名称,列A是团队名称。 任何指针都会有所帮助。 Sub LooproutineCharts() Dim TeamName As String Dim TeamNameCharts As String For i = 4 To 12 TeamName = Sheets("Parameter").Range("A" & i).Value 'identify the location TeamNameCharts = Sheets("Parameter").Range("B" & i).Value 'identify the location Call Charts(TeamName) ' Call subroutine Call Charts(TeamNameCharts) ' Call subroutine Next i End Sub Sub […]

图w在x轴上的date

我有一个代码集根据单元格值自我更新x轴。 我希望这些值显示为date,但使用标准的文本types的格式(例如,我有风格月份年份,1月16日,作为我的x轴上的每个点)。 但是,因为用户正在input代码中引用的这些单元格的最小值和最大值,所以我只希望将其作为文本提取出来,以便此代码可以识别它并对其进行绘制。 我在下面标有**的行出现错误。 我不知道该怎么做。 谢谢! With ActiveSheet.ChartObjects("Chart 2").chart Select Case Target.Address Case "$L$37" **.Axes(xlCategory).MaximumScale = Target.Value** Case "$L$38" .Axes(xlCategory).MinimumScale = Target.Value Case "$L$39" .Axes(xlCategory).MajorUnit = Target.Value Case "$O$37" .Axes(xlValue).MaximumScale = Target.Value Case "$O$38" .Axes(xlValue).MinimumScale = Target.Value Case "$O$39" .Axes(xlValue).MajorUnit = Target.Value End Select End With

Excelgraphics – 2折线图/每一行表示它自己的数据集

我已经尝试了多种方式来创build这个图,但我不能。 如果我把数据放到数据透视表中,它将不允许我创build图表(错误信息是我无法从散点图创build图表)。 我把它放在一个数据透视表中,将这两列的数据分组以帮助组织图表(date格式化为2015年1月1日,因此我试图将所有date分组为几个月)。 这是我正在做的事情: 我有两列。 A栏和B栏 第A / 319行 – 数据由2015年每个月的date组成 B列/ 109行 – 数据由2016年每个月的date组成 我正在尝试创build一个线条图,显示以下内容: 两条线 ,一条代表2015年 ,另一条2016年 。 x轴应显示一年中的月份。 y轴应该显示数字(代表当月数据显示的次数)。 我使用错误的图表吗? 我没有正确设置我的数据吗? 目前,在A1和B1行是年,所以2015年在A1和2016年在B1 。 下面的每一行都有随机的date。 基本上这些date中的每一个代表一个公开票,所以我试图找出每月打开多less张票。 照片由于要求: 我可以得到一个单一的行,但不能与两组数据。 两套数据: 将date移到一列中,仍然是一行: @SeanC – 数据不准确。 另外,从7月到12月,2016年没有date。 此外,它显示2016年6月2日,但还有更多。 2015年看起来更准确,但不是2016年。 @SeanC – 删除了2016年的总数,同样的问题 在这里添加更多的证据(B列中的最新date是6月28日,而且还有13个date6月 – 如果您注意到,数据透视表显示了6月份的2个date以及在B列中甚至不存在的月份的date):

我如何在Excel中使用指定的数据作为轴

我有一个关于在Excel中做graphics的问题,我试图做一个加速度计的表示。 在这个我有4个值X,Y,Z和测量之间的时间。 X = 1,039 Y = 8,743 Z = 4,747 TIMEms = 4 我有600 +这样的价值集,我想为X,Y,Z三个graphics与TIMEms作为水平轴上的每个数据点之间的距离。 我怎样才能做到这一点? 我尝试使用TIMEms的值,但是这只是给我一个由5组成的水平轴,它们之间的默认距离为1。

在Excel上绘制时间date图表

我有一个Excel表格,下面的列 date时间值 我想在图表上用X轴上的时间,Y轴上的值和date作为一条线来绘制图表。 我怎样才能做到这一点?