River's Footmar And Note

2021年3月10日星期三

如題，這是多年前小編自己用VBA寫的程式，已使用多年，用來協助小編追縱營收年增率的小工具，小編這個小工具可以做單月、三個月與6個月的自動分析，但還是有美中不足要改進的地方；就是沒法掌握營收的強度，簡單整理如下圖1，當分享。

圖1.6個月營收年增率轉正

程式流程：

圖2.系統運作圖

根據基本面、每月營收，小編自己設計了一套EPS預測系統，紀錄跟比較一下準確度。

雖然GOOGLE可以找到一堆方法，甚至教科書也有寫，所以我就不在寫一堆公式說明怎計算了；小編想法是可以分成3段預測，來做評估，分3段的概念，概念說明還沒整理好，先以紀錄為主。

海韻電6203：

超峰2441：

南帝2108：

5471：

6449：

自己最近也在思考用簡單的概念表達自己的股票收集資料範圍，就整理成如下圖了

簡單來說，分成三個部分，收集資料範圍、定期更新、寫入資料庫

有資料收集當然也要有輸出部分，所以在整理成如下圖。

根據條件查詢，系統自動分析基本面情況並做出EPS預測；也根據每日交易情況做技術資料分析、股價走勢分析與集保分析；小編寫的好簡單，至於怎做那可就是長篇大論了。

因為有商業避免，所以打上自己的浮水印，請勿轉載。

隨便整理整理：

隨便整理的，當分享。

隨便整理的。

最近在練習寫儲存格註解，改成副程式，免得占用程式碼版面。

先來MSDN一下，註解是RANGE的屬性之一，MSDN的說明。

小編寫的副程式有3個參數要設定，分別是"SHEET_NAME, RANGE_TARGET, Str_COMMENT"。

SHEET_NAME：工作表表名

RANGE_TARGET：儲存格位置，如A1、A2不可以用CELLS位置控制

Str_COMMENT：要註解的內容

透過WITH~END WITH做物件引用，然後若判定有註解則先刪除，在寫入新的註解。