2

我还有一个非常令人困惑的问题，你们中的一个人也许能够解决。所以基本上我有这段代码可以使用 Excel VBA 编写折线图。它的制作使其可以是动态的，并且可以在添加更多值时更改。但是它将第一个值读取为 0，将最后一个值读取为 0，即使它们不是 0。这是我用来将图表放在页面上的代码。

Sub createchart4()

lastA = Range("A1").End(xlDown).Row
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlLine
ActiveChart.SetSourceData Source:=Range("Main!$A$1:$A$" & lastA)
ActiveChart.ChartTitle.Select
ActiveChart.SeriesCollection(1).Name = "=Main!$A$1"
ActiveChart.SeriesCollection(1).Values = "=Main!$A$3:$A$" & lastA

End Sub

意思是 A3 的值实际上是 1534 时为 0，并且当 A10 和 A11 不同时也将它们读为 0。

如果你能弄清楚这一点，我会很惊讶：D

4

1 回答 1

3

图表忽略数字的唯一情况是数字存储为文本。见快照

在此处输入图像描述

如何知道数字是否存储为文本以及我们如何纠正它？

如果您使用的是Excel 2003，请转到菜单Tools | Options。在Error Checking选项卡下，确保选中该复选框Number Stored as text。

在Excel 2007/2010中，单击Excel Options可以从Office IconExcel 2007中或Excel 2010Options中的File选项卡中访问的。

转到Formulas选项卡并确保Numbers formatted as text or preceded by an apostrophe已选中。

如果上面的复选框被选中，那么您会注意到一个小的绿色三角形，如上面的快照所示。选择从第一个具有绿色三角形的单元格开始的整个范围。点击。点击，你就完成了。Exclamation markConvert to number

在此处输入图像描述

于 2012-05-31T04:03:19.453 回答