马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。
您需要 登录 才可以下载或查看，没有账号？註冊
x
Lunar_Dll.rar
(297.44 KB, 下载次数: 890)
http://blog.xuite.net/jdwang1000 ... 9%B4%E6%9B%86+2014.
農曆函數壓縮檔 [ Lunar_Dll.rar 316 KB ] 內含以下六個檔案
1. LunarAddin.dll 200 KB
2. Lunar函數示範.xlsx 37 KB 3. Install_Dll.xlsm 30 KB ( 先執行此巨集檔以安裝農曆函數 , 自動識別 32 或 64位元作業系統 ) 4. UnInstall_Lunar.xlsm 23KB ( 解除安裝 LunarAddin.dll 農曆函數巨集檔 ) 5. Calendar.xlsx 225 KB
6. 農曆函數使用說明.doc 123 KB
請先解壓縮 Lunar_Dll.rar 得到以上六個檔案 然後須以 [ 系統管理員身分 ] 執行 Install_Dll.xlsm Install_Dll.xlsm 為含巨集的VBA程式檔 , 開啟 EXCEL 後需勾選 [啟用內容] 以允許巨集執行 所有函數使用說明均在 [ 農曆函數使用說明.doc ] 有詳細解釋
本 LunarAddin.dll 均可正常使用於以上版本 EXCEL 若有需要 EXCEL 2003 版本者可在此留言索取我會 mail 檔案給需要者 http://www.mediafire.com/?4qutd9qb0nh8qbd
目前先公開提供 EXCEL 2007 ~ 2013 版 的檔案
若有需要 EXCEL 2003 版本者可連結到我的 YAHOO Blog 留言索取我會 mail 檔案給需要者
我的 YAHOO Blog EXCEL公曆農曆轉換及24節氣查詢函數 2013/01/08 更新函數連結如下
http://tw.myblog.yahoo.com/jdwang-blog/
本轉換函數具有許多參數可供使用
Lunar(Year,Month,Day,Type)
Year --- 年 -5000 ~ 5000 (為了要適用 1900/01/01 以前的日期所以區分為 年 月 日 三項
Month --- 月
Day --- 日
Type --- 輸出類型 可省略 (內定為0)
Type = 0 或省略 ( =Lunar(2012,4,20) 或 Lunar(2012,4,20,) 或 Lunar(2012,4,20,0) 三十 )
Type = 1 月日 ( =Lunar(2012,6,14,1) 閏四月(小) 廿五 )
Type = 20 月日國定假日 ( =Lunar(2012,6,23,20) 五月(大) 初五 端午節 )
Type = 21 月日農曆節日 ( =Lunar(2012,2,23,21) 二月(小) 初二 頭牙 土地公生 )
Type = 22 月日農曆及國曆節日 ( =Lunar(26,1,15,22) 臘月(小) 初八 臘八(佛成道節) 藥師節 )
Type = 23 月日國曆節日 ( =Lunar(26,4,5,23,23) 二月(小) 廿九 民族掃墓節 音樂節 )
Type = 24 月日佛教節日 ( =Lunar(2152,5,2,24) 四月(小) 初八 釋迦牟尼佛聖誕 )
Type = 25 月日道教節日 ( =Lunar(2152,12,21,25) 冬月(大) 廿六 北方五道聖誕 元始天尊誕 )
Type = 71 農曆節日 ( =Lunar(2013,10,13,71) 重陽節 )
Type = 72 農曆及國曆節日 ( =Lunar(2065,11,12,72) 下元節 國父誕辰紀念日 中華文化復興節 醫師節 )
Type = 73 國曆節日 ( =Lunar(2011,4,1,73) 愚人節 主計節 )
Type = 74 佛教節日 ( =Lunar(2011,7,19,74) 觀音菩薩成道 )
Type = 75 道教節日 ( =Lunar(2011,10,5,75) 北斗九星降世辰 鬥姥元君 九皇星君 重陽帝君 玄天上帝飛升 中壇元帥 豐都大帝聖誕 )
Type = 8 24節氣 ( =Lunar(2011,12,22,8) 冬至 ) 注意 : 若不是節氣日子則傳回空字串
Type = 9 農曆年 天干地支 生肖 月 日 星期 節氣
( =Lunar(2012,1,21,9) 農曆2011年 辛卯 [ 兔 ] 臘月(小) 廿八 星期六 大寒 )
( =Lunar(15,2,6,9) 農曆14年 甲戌 [ 狗 ] 臘月(大) 廿九 星期三 立春 )
當查詢日期為 1900/1/1 ~ 2300/12/31 時則函數內可套用 EXCEL 的日期時間並省略月日參數
例如當儲存格 [A1] = 2012/1/24 則在 [B2] 可輸入 =Lunar(A1,,,9) 農曆2012年 壬辰 [ 龍 ] 正月(大) 初二 星期二
=Lunar(A1,,,22) 正月(大) 初二 年初二 回娘家
此函數可自由靈活搭配使用就如同工作表函數一般
請注意 : 須以系統管理員身分執行此安裝程序才能正常安裝 dll 動態連結檔
其中 Install_2007.xlsm 為安裝檔 直接開啟他並允許巨集執行
當按下安全性警告 已經停用巨集 旁的 [ 選項 ....] 按鈕
若出現安全性警訊如圖
按下 啟用這個內容(E) 的核取鈕並按下確定
再次按下 [ 安裝 (2003版) Lunar_24_V1.20Beta ] 即可自動安裝
執行後將先出現確認系統管理員身分提醒
如果安裝期間出現如下視窗
則只要按下確定按鈕安裝程式將再次執行安裝程序
待安裝完成後會出現如下訊息視窗
當看到此視窗後即表示一切安裝已正常完成此時按下確定按鈕後 EXCEL 會自動關閉
重新啟動EXCEL後會有一確定訊息視窗如下
按下確定鈕後即可如EXCEL內建函數般自在的使用此國曆轉農曆函數
2012行事曆展示
|
[复制链接]
发表于 2014-4-13 19:58:42
