標題: [發問] 請問雙Y軸的tick圖形，每天都依據一個變數當成零的起始點畫圖 [打印本頁]

---

作者: yystone    時間: 2015-2-25 23:30     標題: 請問雙Y軸的tick圖形，每天都依據一個變數當成零的起始點畫圖

如下圖的圖形，左邊Y軸是台指價格(白色實線)，右邊多空能量
[attach]20297[/attach]
假設昨收價是9648(每天變動)，那麼該如何設定，當價格收漲時，白線畫在9648之上，
價格是跌勢，白線畫在9648之下，意思是將9648當零。
VBA該如何寫才能自動將每日收盤價當成零軸。

---

作者: yystone    時間: 2015-2-26 00:52

本帖最後由 yystone 於 2015-2-26 00:55 編輯

我嘗試自己寫的程式碼如下:
Sub 巨集2()
'收盤價放在M2儲存格
    A = Range("M2") + 100
    B = Range("M2") - 100
    ActiveSheet.ChartObjects("圖表 2").Activate
    ActiveChart.ChartArea.Select
    ActiveChart.Axes(xlValue).Select
      ActiveChart.Axes(xlValue).MaximumScale = A
        ActiveChart.Axes(xlValue).MinimumScale = B
End Sub
-----------------------------------------------------------
可以劃出以收盤價為零軸
請教高手，該如何自動執行
[attach]20298[/attach]

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)