Tag: 图表
在Excel VBA 2016中删除图表中的数据
我有一个dynamic的图表，我很难清除数据。 据我所知，这些数据指标是累积的。 这意味着，如果我从另一张表中复制了12个数据集的“图表4”，并且干净地制作完成。 数据库的数量= 12 = ActiveSheet.ChartObjects（“Chart 4”）。Chart.SeriesCollection.count。 而这些系列的指数从1到12。 现在，如果我删除1个系列和一个新系列，数据库的数量将继续为12，但是指数现在将从1到11和13运行。 所以，当我试图通过计算序列数量和删除序列的数字删除它们：1：ActiveSheet.ChartObjects（“Chart 4”）。Chart.SeriesCollection.count如果系列已被删除和添加将失败。 所以为了克服这个问题，我尝试了“对于每个..在图表4 ..选项： For Each Series In ActiveSheet.ChartObjects("Chart 4") 'For Each FullSeriesCollection In ActiveSheet.ChartObjects("Chart 4") ActiveChart.FullSeriesCollection.Delete Next 为此，我得到一个错误，指出：“对象不支持此属性或方法” 所以我在堆栈溢出问题上看了这个问题，发现由于图中数据库索引的努力程序，计数器需要下去： 因此，我从VBA删除图表系列复制和调整： Dim iSrs As Long With ActiveChart For iSrs = .SeriesCollection.count To 1 Step -1 If InStr(LCase$(.SeriesCollection(iSrs).name), "series") > 0 Then .SeriesCollection(iSrs).Delete End If Next […]
VBA – 不正确的graphics代码
首先，感谢过去所有的帮助，这个网站是一个祝福，你们都是圣人。 现在到业务 我遇到了一组testing数据，其他graphics正确，但是，这组数据导致我的graphics看起来错误。 我想我发现了这个问题，但我不确定如何解决这个问题。 当我的代码创build的范围graphics，由于math错误，它不抓住正确的范围。 作为参考， DataLength = 102 ，这就是graphics和一部分数据的样子。 我需要绘制到"CZ"但它只是去D因为fRemainder = 0这里是fRemainder = 0代码。 Dim iAlpha As Integer, fAlpha As Integer Dim iRemainder As Integer, fRemainder As Integer Dim ConvertToLetter As String Dim fConvertToLetter As String iAlpha = Int((DataLength) / 26) '26 for the letters fAlpha = Int((DataLength + 2) / 26) 'for the […]
颜色图表列由单元格颜色错误
我正在尝试使用特定工作表上活动单元格的单元格颜色创build图表。 当使用下面提供的macros时，我发现只有一些分配的单元RGB颜色代码与图表匹配。 我不知道为什么有些颜色会匹配，有些则不会。 当我手动input颜色代码时，图表中显示正确的颜色。 有没有什么我离开这个macros或我需要采取额外的步骤？ 我为这个项目使用Excel 2016。 Sub ColorChartColumnsbyCellColor() With Sheets("Sheet1").ChartObjects(1).Chart.SeriesCollection(1) Set vAddress = ActiveSheet.Range(Split(Split(.Formula, ",")(1), "!")(1)) For i = 1 To vAddress.Cells.Count .Points(i).Format.Fill.ForeColor.RGB = ThisWorkbook.Colors(vAddress.Cells(i).Interior.ColorIndex) Next i End With End Sub
获取Excel图表Y轴的最大值（当有两个）
我想知道如何以编程方式查找和有多个可用的Excel图表的Y轴最大值。 我的最终目标是find最大的y轴值，比较它们，并将它们设置为两者中较大的一个。
如何从Excel表格与macros生成图表
我在Excel表中有一些数据 id XY 93c3ac0d-5618-42a1-8495-79c890bcc440 3,855860732 3,855888397 7ba28c26-2a1f-41be-80f0-b0cfae97c504 3,818260653 3,818589846 a23ace40-c3c3-45cc-ab32-b59e33b7f83b 9,55033235 9,58033235 013c91b3-bc88-4dbd-ba65-1b02fd093ebb 6,541669914 6,552391904 afaef874-f52c-4ba2-9565-8bc7facabc93 6,560388448 6,570680712 35bfd027-147d-4a18-aa1b-217a3593c4b0 8,532138865 8,550715203 2b7e96d4-8e7b-422b-b07e-0e75378777cd 8,541575561 8,53250362 d34f7be8-65d1-4c22-b4c7-344db0ba356b 8,542794004 8,545666996 9430ea31-f8da-43be-9a4f-54cf382aa450 8,557895658 8,522192019 30d1998a-85b2-456b-81a7-878eafc418f7 9,55033235 9,58033235 19876333-2120-445e-b1cf-d6f5503c8513 9,55033235 9,58033235 4831acb3-b9e3-4a4c-9619-c835f6e77ea2 9,55033235 9,52033235 47bc5691-a6af-4898-b892-da98b56e6f6f 6,54075573 6,544362052 e4ab1a50-26e5-4f0e-8d62-ab24249125e9 8,5416706 8,5559438 56e6298e-e05a-433e-8365-a97dba2276df 9,55033235 9,52033235 f550a46e-139d-4073-a30e-d9c37d807475 9,55033235 9,548071894 43c667e0-c505-4843-aead-cbfc32bf6ac4 3,828557425 3,828682676 18f4f9a7-dfba-4e39-8a9d-6e812dbf89f3 […]
EXCELgraphics – dynamic更改graphicstypes
想要dynamic改变一个图表types（不使用VB脚本，这是甚至可能吗？） – 从酒吧到线或饼图。 当用户点击一个单选button或下拉菜单或任何其他方式时，这将被触发。 初学者，请帮忙
根据图表数据改进algorithm来适当缩放图表轴限制
前一阵子我做了这个子程序，因为我不满意Excel的图表自动缩放。 内置的Excel方法在一定程度上起作用，但是当图表数据的范围稍宽时，它将最小比例设置为0，这可能导致在其下方具有大量空白空间的非常压缩的线条。 像下面… 我写的代码试图通过根据图表中的数据为y轴select合适的最大和最小限制来改进excel的方法。 它工作正常，但有时select不是最好的价值。 下面是我的代码应用于同一个图表的结果： 在这里它适合所有的数据在绘图区域，所以很清楚看到，但它所select的值并不是最好的。 一个人可以看看这个数据，并快速评估90和140可能是在这个例子中使用的最好的限制，但我写了一个脚本也遇到了麻烦。 这是整个子。 这不是太长。 我会很感激任何build议，以改善限制的计算… Sub ScaleCharts() ' ' ScaleCharts Macro ' Dim objCht As ChartObject Dim maxi As Double, mini As Double, Range As Double, Adj As Double, xMax As Double, xMin As Double Dim Round As Integer, Order As Integer, x As Integer, i As Integer Application.ScreenUpdating […]
Excel列表图表中的数据但不是图表中的数据
我目前正在创build一个比较两年销售数据（2012年和2013年）的柱形图。 我想在列图下方的表格中显示数据，其中还包括百分比变化。 我有这一切想通了，但似乎无法找出一种方法来消除从图本身的百分比变化列。 所以我的问题是我怎么能保持图表下面的图表％变化的数据，但从列graphics本身消除？ 谢谢。 Patrick Wilson
我可以使用Excelwriter和SSRS集成创build一个非饼图吗？
我正在使用SoftArtisans ExcelWriter进行SSRS（版本8.6），并且想知道是否可以创build一个（非饼图）图表，例如具有多个系列的堆叠条形图？ 我可以很容易地创build饼图，这就是帮助文档显示的内容，但是对于SSRS集成的其他types的图表没有样本。 Excel模板embedded到.rdl文件中，当用户使用OfficeWriter的Excel呈现扩展名导出生成的报表时，会创build电子表格。 但是报表是由用户手动运行的，所以我没有能力在用户看到之前执行任何代码来修改Excel对象。 任何人都可以确认只有饼图可以用于SSRS集成，或者提供一些其他图表types的可能性的洞察。
Excelmacros创build线图，不包括列之间的列
我想在Excelmacros中创build折线图。 我在Excel中有下面的表格。 第一条线图包含单元格A和单元格B的值范围。第二条折线图包含单元格A和单元格C的值范围。第三条折线图包含单元格A和单元格D的值范围。 ActiveSheet.Shapes.AddChart.Select ActiveChart.SetSourceData Source:=Range("A1:D3") ActiveChart.ApplyDataLabels ActiveChart.ChartType = xlLine 以上代码只能生成一个范围A1到D4的折线图。
