早上無料,就整理了,沒特別用途,有用到資訊的人可以參考歐,但投資理財自負盈虧,不負任何責任。
喜歡攝影的我,喜歡到處拍拍照,吃點當地的特色食物。 跟朋友聊天之餘,推薦我寫成網誌跟大家分享。 沒外出的日子,喜歡在家當隱性宅,寫程式看看書,追劇。 希望我的手札文,不會讓你翻桌 XD
2021年7月23日 星期五
VBA:歷史資料計算本益比
首先準備資料:歷史股價(任意門YAHOO FINANCE),EPS:這部分資料各大卷商都有得查。
主題:小編主要是透過RANGE物件的方法AUTOFILTER與MAX、MIN等內建函數功能來完成本益比高低點歷史資料計算。
本益比簡單快入說明,就是股價/EPS=本益比;本益比高點=股價高點計算結果、本益比低點=股價低點計算結果。哈哈好廢話歐😁
來看VBA怎寫:
小編直接用YAHOO FINANCE下載的檔案直接新增一頁工作表1,然後在列1輸入年份,2020~2015;ˋ接著作一個按鈕插入以下CODE內容。
CODE:
539了嗎?三星組合出現次數彙整
一樣透過vba做數字組合練習,就來臉習各三星組合好了,539數字組合為1~39等數字,排列組合不重複,三星數字組合合計有9139組組合,小編透過歷史資料比對後整理出9139組數字組合開獎的次數。 單純寫寫程式玩玩,別參考買注歐
2021年7月22日 星期四
VBA:FileDialog+Workbook.SaveAs 另存新檔
一個朋友跟我說,很多時後掌握基礎比複雜的說明問題更好;今天處理自己工作上的xlsx檔案轉存為xls檔案,用了之前自己寫的FileDialog案例,也做做分享。
作一個按鈕插入以下CODE:
CODE流程:關閉自動運算等功能>宣告物件>對話框>迴圈>開啟檔案>變更檔名>關閉>下一個檔案>離開迴圈>完成對話框顯示
操作流程:點選按鈕>對話框選擇檔案>開始轉換>發呆
若要修改成其他副檔案名稱:2021年7月20日 星期二
VBA:排列組合遊戲
最近在用VBA排列組合一些數字,做4組數字排列組合的生成,那為何不往5組或更多數字呢!!
因為超過4組數字的1~39高達百萬,要用不同方法堆壘資料阿......
架構:先產生1~39的數字>轉換為陣列>透過迴圈組合數字>檢查有無重複>回寫EXCEL A行VBA:OUTLOOK 指定收件夾轉存信件
這幾天想要透過outlook弄自動化,寫了個簡單的vba,
目的是指定特定收件夾,將郵件轉存到指定資料夾,以利excel存取。
架構:設定存取outlook收件夾>迴圈執行存檔>檢查檔案是否存在>寫檔
啟用outlook 的vba編輯視窗,找到thisoutlooksession,然後貼上vba code即可
2021年7月13日 星期二
指數變化(2024.12.06)
指數變化(2024.12.06) 上周焦點: 密西根消費者信心指數 74,又破70了 本周愛看: 美國蠆售銷售月增率 12/09 美國核心CPI年增率 12/11 美國連續申請失業救濟人數 12/12 本周指數變化: 指數...
-
寫給自己速查 垂直屬性:HorizontalAlignment 水平屬性:VerticalAlignment 置中:xlCenter 靠左靠右:XLLEFT、XLRIGHT Sheets("工作表1").Range("m2").Ve...
-
美國實質可支配所得 利率與黃金 消費者信心 利率PK DW PK FED紐約分行 上海貨櫃指數 BDI CRB 美國m 1 m2 s&p 美國 非農 美國 非農就業職務空缺率 美國股市 行事曆 全球股市行事曆 全球股市 巴菲特指數 外銷訂單年增率 每月20號 外...
-
整理資料時,不免要判斷資料數量,在判斷資料時,資料有時會有不連續與連續資料,這時候判斷方式不盡相同 連續資料時: a行於65000儲存格以前的最後列,有點饒舌;應該是這樣看,從a65000往上找(xlup),找到的第一個儲存格,也相對於是a行在65000列之前最後一列。 END...