[VBA ] 如何利用VBA製作折線圖

看板Visual_Basic作者 (隨風而逝的記憶)時間16年前 (2010/02/28 16:20), 編輯推噓1(1推 0噓 1→)
留言2則, 1人參與, 最新討論串1/1
我有一個資料表格如下： 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
推
03/03 08:46, , 1F
你需要把宣告 Worksheet 與 Range 變數, 再用 Set 去指定變數
03/03 08:46, 1F
→
03/03 08:46, , 2F
的值
03/03 08:46, 2F
‣ 更多 ataru921 的文章
文章代碼(AID): #1BYYTZFT (Visual_Basic)