sDObj = new Datey，m，i+1 当月一日日期 lDObj = new LunarsDObj 农历 lY = lDObjyear 农历年 lM = lDObjmonth 农历月 lD = lDObjday 农历日 lL = lDObjisLeap 农历是否闰月 lX = lL。

excel公历转农历方法一使用text函数 A列是公历日期，我们在B1单元格输入公式=TEXTA1，quot$yyyy年m月quotIFLENTEXTA1，quot$ddquot=1，quot初quot，quotquotquotdquot，下拉完成公历转农历。

=== 传回农历 y年闰月的天数 function leapDaysy ifleapMonthy returnlunarInfoy？ 30 29else return0 === 传回农历 y年闰哪个月 112 ， 没闰传回 0 function。