我在Excel中有一个宏,它从数据创建图表是第一个工作表。问题是图表是空白的,直到我右键单击,选择数据,然后按确定。我不必实际选择已填充值的数据。一旦我这样做,图表看起来很好。如何让图表显示值而无需手动执行此操作?
ActiveSheet.Shapes.AddChart2(240, xlXYScatterLinesNoMarkers).Select
ActiveChart.SeriesCollection.NewSeries
ActiveChart.FullSeriesCollection(1).Name = Sheets(1).Range("C1")
ActiveChart.FullSeriesCollection(1).XValues = Sheets(1).Range("AB:AB")
ActiveChart.FullSeriesCollection(1).Values = Sheets(1).Range("C:C")
答案 0 :(得分:0)
有时,Excel中的模块可能会被破坏,代码会做出奇怪的事情。
将代码复制到记事本或记事本++中,删除模块,添加新模块,然后将代码从记事本粘贴回模块。看看是否有帮助。我必须不止一次这样做。