2021年5月3日 星期一

VBA:練習畫折線圖(根據集保庫存資料)

畫持股變化折線圖:

 


怎畫的入門篇語法:MSDN

code:






2.整理原始資料:如下。


圖1.


這畫圖副程式,如上CODE內容,表頭長這樣:

持股對照圖(SHEET_NAME, RANGE_ADDRESS, DATA1, DATA2, xlColumnClustered_option, XLINE_WORD, DELTEE)

有7個變數要設定。

SHEET_NAME:資料位置的工作表

RANGE_ADDRESS:圖要放的儲存格位置

DATA1:第一組資料位置

DATA2:第二組資料位置

xlColumnClustered_option:畫圖設定,目前都設定0為主

XLINE_WORD:第二組資料的標題設定

DELTEE:是否把前回CHART物件刪除。

小編的資料,有特別整理出集保庫存分析,與每周收盤的股價,演練的資料為100張以下持股資料,小編的原始資料放在AL與AT這兩個儲存格,以及想把圖放在W14的儲存格位置,b_count_a這個變數是資料總筆數設定,小編是抓50筆所以"AL1:AL" & b_count_a的執行結果為"AL1:AL50"這樣歐,整體副程式呼叫設定如下:

Call 持股對照圖("集保庫存分析", "w14", "AL1:AL" & b_count_a, "AT1:AT" & b_count_a, 1, "當周最後收盤價", 0)

執行結果如下:

圖2.


沒有留言:

張貼留言

我的雷達:2024/11/15

  似乎有一種不安的味道