1、你百度“Excel陽歷轉(zhuǎn)農(nóng)歷”可找到，但為什么不用公式直接計算=TEXTA2，quot$yyyymdquot如你要用VBA ，可寫為Sub 宏1A1 = ApplicationTextA2， quot$yyyymdquotEnd Sub；這個類也可以從MFC例子中直接提取因為有好多個例子源碼，就不貼代碼，直接上圖，工程在附件中用電腦登錄可見，若VS版本低于2008 SP1，請自建工程，然后再添加頭文件和源文件超全資料，一定要采納哦僅供參考 ，提取。

2、2雖然在遇到閏月時，顯示結(jié)果有點差強人意，如下圖中，2010年2月9日的農(nóng)歷應(yīng)是十二月二十六，但因為那年有個閏五月，就無辜多出來一個月了不過總比編代碼要快捷多了，而且閏月也不是天天有3假如把公式改成=。

3、單行帶農(nóng)歷的日期時間代碼 ltSCRIPT language=JavaScript lt！ function CalConv FIRSTYEAR = 1998LASTYEAR = 2031today = new DateSolarYear = todaygetFullYearSolarMonth = todaygetMonth + 1；農(nóng)歷節(jié)日 *表示放假日var lFtv = new Arrayquot0101*春節(jié)quot，quot0115 元宵節(jié)quot，quot0328 我生日quot，quot0505 端午節(jié)quot，quot0707 七夕情人節(jié)quot，quot0715 中元節(jié)quot，quot0815 中秋節(jié)quot，quot0909 重陽節(jié)quot，quot1208 臘八節(jié)quot，quot1224 小年quot，quot0100*除夕quot；日期標準格式 公歷日期標準格式為2007年2月6日或20070206農(nóng)歷日期標準格式為丁亥年臘月十九日干支歷日期標準格式為丁亥年壬寅月辛未日日期書寫不得以小數(shù)點或頓號代替年月日，如200726 20072；function RunGLNL var today=new Date var d=new Arrayquot星期日quot，quot星期一quot，quot星期二quot，quot星期三quot，quot星期四quot，quot星期五quot，quot星期六quot var DDDD=todaygetYearlt100 ？ todaygetYear+1900。

4、誰知道農(nóng)歷是怎么個計算的方法有函數(shù)最好函數(shù)不要那種有個與公歷對應(yīng)的表然后換算的1我不要控件！2不要有公歷農(nóng) 誰知道農(nóng)歷是怎么個計算的方法有函數(shù)最好函數(shù)不要那種有個與公歷對應(yīng)的表 然后換算的1我不要控件；下面代碼開始lt%#39Option Explicit#39***#39 類名稱ChinaDay#39 用途#39 根據(jù)輸入的日期計算該日期的農(nóng)歷天干地支及當年屬相#39 使用方法#39 第一個參數(shù)為輸入?yún)?shù)，不填寫默認為當日，#39 只計算192128之后的日期#39 #####39 Dim objChi；包含星期計算公歷轉(zhuǎn)農(nóng)歷農(nóng)歷轉(zhuǎn)公歷節(jié)氣查詢數(shù)據(jù)與算法均為原創(chuàng)，絕非網(wǎng)上復制而來附件中有源代碼，同時附帶農(nóng)歷數(shù)據(jù)提取工具，可提取1600到7000年之間的任意年份區(qū)間，提取后的數(shù)據(jù)為壓縮數(shù)據(jù)，占用空間小，同時數(shù)據(jù)包含；我剛好有資源，這是我原創(chuàng)的程序，里面的數(shù)據(jù)壓縮方式轉(zhuǎn)換參考點等，都是自行設(shè)計的，能夠準確地將公歷轉(zhuǎn)農(nóng)歷，將農(nóng)歷轉(zhuǎn)公歷，同時還提供一個自行設(shè)計的農(nóng)歷庫，附帶例程，還有農(nóng)歷信息提取工具，可以自定義年份區(qū)間1600；1982年的數(shù)據(jù)是0x0a974 0000 1010 1010 0111 0100 表示1982年的4月為閏月，即有第二個4月，且是閏小月從1月到13月的天數(shù)依次為3029302929閏月3029302929303030不明白百度HI；function RunGLNL var today=new Datevar d=new Arrayquot星期日quot，quot星期一quot，quot星期二quot，quot星期三quot，quot星期四quot，quot星期五quot，quot星期六quotvar DDDD=todaygetYearlt100 ？todaygetYear+1900todaygetYear。

5、自定義函數(shù)，calendar，將此段代碼復制到模塊中 計算時間從21年2月8日到2020年的數(shù)據(jù)可以轉(zhuǎn)換成農(nóng)歷 Option Explicit Dim WeekName7， MonthAdd11， NongliData120， TianGan9， DiZhi11， ShuXiang11；flash中有專門的組件用于日歷的，你可以試試，設(shè)置可以在參數(shù)中調(diào)覺得行的話，給我加點分，謝謝；純ASP代碼之公歷轉(zhuǎn)農(nóng)歷實現(xiàn)含屬相例子代碼 可以參考這個 asp？stype=1keyword=%C5%A9%C0%FAx=31y=12 以上轉(zhuǎn)自 自由時空學習網(wǎng) 參考資料。

6、2按Alt+F11打開代碼編輯器，3點“插入”“模塊”，4在左側(cè)欄中雙擊模塊，5在右側(cè)的編輯區(qū)中粘貼代碼，6檢查代碼是否報錯變紅，7關(guān)閉代碼編輯器重要說明說明1從這里復制的代碼，行與行之間會被。