作者ataru921 (随风而逝的记忆)
看板Visual_Basic
标题[VBA ] 如何利用VBA制作折线图
时间Sun Feb 28 16:20:48 2010
我有一个资料表格如下：
A B C D E F G H I J K L......
-----------------------------------------------
1|
2|
3|
4|
5|
6|
7|
8|
9|
10|
.
.
.
.
如果我只想要选择C2,E2,G2,I2储存格中得资料来做x轴的数列；选择D4,E4,K4,N4储存格
中的资料来作为y数列
用macro录下来的结果会像是下面的样子
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlLineMarkersStacked
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).Name = "='Sheets1'!$B$4"
ActiveChart.SeriesCollection(1).Values = _
"='Sheets1'!$D$4,'Sheets1'!$E$4,'Sheets1'!$K$4,'Sheets1'!$N$4"
ActiveChart.SeriesCollection(1).XValues = _
"='Sheets1'!$C$2,'Sheets1'!$E$2,'Sheets1'!$G$2,'Sheets1'!$I$2"
但是我想要把Sheets1和储存格的位置可以设为变数以便可以套用各个不同的状况，这该
怎麽设定呢
感谢大家的帮忙
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.113.235.115
1F：推 qsss:你需要把宣告 Worksheet 与 Range 变数, 再用 Set 去指定变数 03/03 08:46
2F：→ qsss:的值 03/03 08:46