作者jasonhsu14 (汐止愛因斯坦)
看板Office
標題[算表] VBA合併繪圖
時間Wed Dec 27 17:23:31 2017
軟體:Excel
版本:2003
大家好，不才小弟我希望繪製K線圖，並在圖上特定價格標示出來
先附上資料圖與目前的繪圖結果
https://imgur.com/NL5NJYW
A就是我欲放在下方橫軸的日期
B~E就是繪製K線圖所用的資料
而H跟I則是我欲在K圖上標示出來的特定價格
叉叉是對應H欄位的資料、菱形是對應I欄
目前碰到最大的第一個問題是1
0/19的價格2是沒有價格的，照理說10/19的K線不該出現菱形，但卻出現在10/19了....
初步觀察覺得是因為I2是第一筆資料
而第一筆資料又是空白欄位，所以程式會自動尋找有值的資料(I3)，做為第一筆資料
但我希望第一筆資料若是空白時，會直接跳到下一天，而非尋找有值的資料當第一筆
下圖為我的程式碼
https://imgur.com/Tm1L9mU
我的程式主要順序為，先製作K線圖，再加入XY散布圖，最後再設定橫軸日期與縱軸範圍
想麻煩各位版友協助，為避免出現上述10/20的資料在圖上跑到10/19去的問題
程式上我有甚麼地方需要修改
另外，第二個問題想請教最下面出現錯誤的那邊，是因為版本2003而出錯嗎?
因為我印象中，同樣的寫法套用在2010沒出錯
若是的話，可以如何修改?
補充：Cells(36,"C")與Cells(35,"C")分別為K線圖資料中的最小值與最大值
再請教第三與第四個問題，AxisGroup應該是指我將該Collection也併入主圖吧?
設定橫軸日期與縱軸範圍的順序是否會影響畫圖出來的結果?
因為我若先設定縱軸範圍與橫軸日期再繪K圖也有出錯...
上述問題有點多，還先謝謝協助處理的版友們，謝謝
若版大們有更好的寫法希望可供參考
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 211.22.64.151
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Office/M.1514366619.A.FDC.html
1F：→ soyoso: 問題二，如出現為型態不符合，錯誤13 12/27 18:41
3F：→ soyoso: 上方各加上chart.select試試，測試上暫無產生錯誤 12/27 18:42
4F：→ soyoso: 問題1為將儲存格i2當成標籤了，可於seriescollection.add 12/27 19:01
5F：→ soyoso: 後面加上參數serieslabels為false 12/27 19:01
6F：→ jasonhsu14: 那想詢問一下，把i2當標籤的話，為甚麼H2卻沒這問題? 12/27 19:29
7F：→ soyoso: 指定h欄和i欄範圍的第一筆為h2,i2分別為數字和空白儲存格 12/27 19:35
8F：→ soyoso: 是否excel因此而判斷上將i2當標籤，這方面可測試看看 12/27 19:36
9F：→ jasonhsu14: S大這麼一說，好像真的很有可能!!也謝謝妳的協助 12/27 20:03
10F：→ jasonhsu14: 請問S大，加入Chart.select是在maximum那欄上方加入 12/28 10:45
11F：→ jasonhsu14: ChtObj.Chart.Select嗎? 12/28 10:46
12F：→ soyoso: minimumscale和maximumscale上方各加上chtobj.select 12/28 10:51
13F：→ jasonhsu14: 謝謝~ 12/28 12:01