vba，自定义公式，农历互转公历，excel ，wps
'vba 模块内容如下 自定义公式 '公历转农历模块 '原创：互联网 '修正： '// 农历数据定义 // '先以 H2B 函数还原成长度为 18 的字符串，其定义如下： '前12个字节代表1-12月：1为大月，0为小月；压缩成十六进制(1-3位) '第13位为闰月的情况，1为大月30天，0为小月29天；(4位) '第14位为闰月的月份，如果不是闰月为0，否则给出月份(5位) '最后4位为当年农历新年的公历日期，如0131代表1月31日；当作数值转十六进制(6-7位) '农历常量(1899~2100，共202年） Private Const ylData = "AB500D2,4BD0883," _ & "4AE00DB,A5700D0,54D0581,D2600D8,D9500CC,655147D,56A00D5,9AD00CA,55D027A,4AE00D2," _ & "A5B0682,A4D00DA,D2500CE,D25157E,B5500D6,56A00CC,ADA027B,95B00D3,49717C9,49B00DC," _ & "A4B00D0,B4B0580,6A500D8,6D400CD,AB5147C,2B600D5,95700CA,52F027B,49700D2,6560682," _ & "D4A00D9,EA500CE,6A9157E,5AD00D6