國曆洋曆農曆生肖轉換

輸入民國曆,自動生成洋曆農曆,主要用到了自定函數和拆字做加減功能。

國曆轉洋曆就是把國曆年加上1911 =MID(B12,1,3)+1911&"-"&MID(B12,5,2)&"-"&MID(B12,8,2)

這邊用year函數會出錯,excel的year是從1900年開始,民國年只有3位數或2位數,所以比較麻煩,要用len、mid函數來轉換成西元日期

轉成洋曆後,再用自定函數轉成農曆,打開開發工具,在Visual Basic中新增一個模塊貼上代碼即可,或按alt+F11。

代碼:

EXCEL洋曆轉農曆vb函數代碼.txt

運行結果,C18要放西曆的國曆日期 , 例2018/07/28 或 2018-07-28或2018年7月28日

其餘記錄在excel文件裡了, 記得要啟用宏才能使用vb自定函數

excel國曆轉農曆天干地支年生肖五行.xlsm