WPS表单如何将公历转换成农历日期？
假设A列为公历日期，A1为公历日期，我们在单元格B1中输入公式:= text (A1，"[$-130000] YYY年M月" &；If (len (-text (a1，"[$-130000]DD ")= 1，" Chu "，" ")&；" d ")，下拉完成公历到农历的转换。
Excel阳历转阴历方法二:使用text+MID函数实现更完整的转换。
a列仍然是公历，B1输入公式:
=MID ("A，B，D，E，E "，MOD (text (A1，" $-130000))-4，10)+1)&；MID("子丑毛寅辰巳沈悠正午徐海"，mod (text (a1，"[$-130000] e")-4，12)+1，1)。"年份" &；文本(a1，"[$-130000][DBM num 1]m月d日")
去做吧。
这里增加了参数[DBNum1]，表示数值以“一、二、三...”的中文格式显示。
Excel阳历转阴历方法三:使用text+MID+ CHOOSE+ YEAR函数。
A1是公历，B1输入:
= Choose(mod(year(A 1)-1900，10)+1，"庚"，"辛"，"人"，"鬼"，"甲"，"乙"，"丙" Choose(mod(year(A 1)-1900，12)+1，"子"，"丑"，"阴"，"毛"，"陈"，"司"，"武"。Text (a1，"[dbnum 1] [$-130000]年m月" &；IF( - TEXT(A1，"[$-130000]d ")& lt；11，“楚”，“)&；TEXT(A1，"[db num 1][$-130000]d "))
您可以在这里显示最初的几天。
Excel阳历转阴历方法4:使用自定义函数。
上面介绍的excel公历到农历的转换是利用excel内置函数完成的。一个缺点是公式太长。如果使用用户定义的函数，可以简化公式列中的输入。
如下图所示，我们可以在B2输入公式=农利(A1)。c列的农历缩写C1的公式为:= right (b1，len (b1)-8)。
以下是与该自定义函数相关的代码:
公共？功能？农利(可选？XX_DATE？作为？日期)
暗淡？MonthAdd(11)，？NongliData(99)，？天干(9)，？迪志(11)，？书香(11)，？DayName(30)，？MonName(12)
暗淡？柯蒂斯？寇尔年？柯月？库尔代
暗淡？巩俐斯特？NongliStr？非liDayStr
暗淡？我，？m，？n，？k，？isEnd？位，？日期
获取当前系统时间
柯蒂斯？=?XX _日期
天干名
天干(0)？=?" A "
天干(1)？=?" B "
天干(二)？=?" C "
天干(三)？=?“丁”
天干(4)？=?" E "
天干(5)？=?“自我”
天干(6)？=?“更”
天干(7)？=?“新”
天干(8)？=?“任”
天干(9)？=?“甲板”
地支名称
迪志(0)？=?“儿子”
迪志(1)？=?“丑”
狄志②？=?“阴”
狄志(3)？=?“毛”
狄志(4)？=?“陈”
狄志(5)？=?“思”
狄志(6)？=?“中午”
狄志(7)？=?“不是”
狄志(8)？=?“沈”
狄志(9)？=?“单一的”
迪志(10)？=?“呃”
迪志(11)？=?“海”
动物星座名称
书香(0)？=?“老鼠”
书香(1)？=?“牛”
书香(2)？=?“老虎”
书香(三)？=?“兔子”
书香(4)？=?“龙”
书香(5)？=?“蛇”
书香(6)？=?“马”
书香(7)？=?“羊”
书香(8)？=?“猴子”
书香(9)？=?“鸡”
书香(10)？=?“狗”
书香(11)？=?“猪”
农历日期名称
DayName(0)？=?"*"
DayName(1)？=?“一年级”
DayName(2)？=?《初二》
DayName(3)？=?“初三”
DayName(4)？=?“四年级”
DayName(5)？=?“第五天”
DayName(6)？=?“第六天”
DayName(7)？=?“第七天”
DayName(8)？=?“第八天”
DayName(9)？=?“第九天”
DayName(10)？=?“第十天”
DayName(11)？=?“十一”
DayName(12)？=?“十二”
DayName(13)？=?《十三》
DayName(14)？=?“十四”
DayName(15)？=?“十五”
DayName(16)？=?“十六”
DayName(17)？=?“十七”
DayName(18)？=?“十八”
DayName(19)？=?“十九”
DayName(20)？=?“二十”
DayName(21)？=?“二十一”
DayName(22)？=?“二十二”
DayName(23)？=?“二十三”
DayName(24)？=?“二十四”
DayName(25)？=?“二十五”
DayName(26)？=?“二十六”
DayName(27)？=?“二十七”
DayName(28)？=?“二十八”
DayName(29)？=?“二十九”
DayName(30)？=?“三十”
农历月份名称
MonName(0)？=?"*"
MonName(1)？=?“积极”
MonName(2)？=?“二”
MonName(3)？=?“三”
MonName(4)？=?“四”
MonName(5)？=?“五”
MonName(6)？=?“六”
MonName(7)？=?“七”
MonName(8)？=?“八”
MonName(9)？=?“九”
MonName(10)？=?“十”
MonName(11)？=?“十一”
MonName(12)？=?“蜡”
公历中每个月的前几天
MonthAdd(0)？=?0
MonthAdd(1)？=?31
蒙哈德②？=?59
MonthAdd(3)？=?90
蒙哈德④？=?120
蒙特哈德(5)？=?151
蒙哈德(6)？=?181
蒙哈德(7)？=?212
MonthAdd(8)？=?243
蒙特哈德(9)？=?273
MonthAdd(10)？=?304
MonthAdd(11)？=?334
月球数据
NongliData(0)？=?2635
NongliData(1)？=?333387
NongliData(2)？=?1701
NongliData(3)？=?1748
NongliData(4)？=?267701
NongliData(5)？=?694
NongliData(6)？=?2391
NongliData(7)？=?133423
NongliData(8)？=?1175
NongliData(9)？=?396438
NongliData(10)？=?3402
NongliData(11)？=?3749
NongliData(12)？=?331177
NongliData(13)？=?1453
NongliData(14)？=?694
NongliData(15)？=?201326
NongliData(16)？=?2350
NongliData(17)？=?465197
NongliData(18)？=?3221
NongliData(19)？=?3402
NongliData(20)？=?400202
NongliData(21)？=?2901
NongliData(22)？=?1386
NongliData(23)？=?267611
NongliData(24)？=?605
NongliData(25)？=?2349
NongliData(26)？=?137515
NongliData(27)？=?2709
NongliData(28)？=?464533
NongliData(29)？=?1738
NongliData(30)？=?2901
NongliData(31)？=?330421
NongliData(32)？=?1242
NongliData(33)？=?2651
NongliData(34)？=?199255
NongliData(35)？=?1323
NongliData(36)？=?529706
NongliData(37)？=?3733
NongliData(38)？=?1706
NongliData(39)？=?398762
NongliData(40)？=?2741
NongliData(41)？=?1206
NongliData(42)？=?267438
NongliData(43)？=?2647
NongliData(44)？=?1318
NongliData(45)？=?204070
NongliData(46)？=?3477
NongliData(47)？=?461653
NongliData(48)？=?1386
NongliData(49)？=?2413
NongliData(50)？=?330077
NongliData(51)？=?1197
NongliData(52)？=?2637
NongliData(53)？=?268877
NongliData(54)？=?3365
NongliData(55)？=?531109
NongliData(56)？=?2900
NongliData(57)？=?2922
NongliData(58)？=?398042
NongliData(59)？=?2395
NongliData(60)？=?1179
NongliData(61)？=?267415
NongliData(62)？=?2635
NongliData(63)？=?661067
NongliData(64)？=?1701
NongliData(65)？=?1748
NongliData(66)？=?398772
NongliData(67)？=?2742
NongliData(68)？=?2391
NongliData(69)？=?330031
NongliData(70)？=?1175
NongliData(71)？=?1611
NongliData(72)？=?200010
NongliData(73)？=?3749
NongliData(74)？=?527717
NongliData(75)？=?1452
NongliData(76)？=?2742
NongliData(77)？=?332397
NongliData(78)？=?2350
NongliData(79)？=?3222
NongliData(80)？=?268949
NongliData(81)？=?3402
NongliData(82)？=?3493
NongliData(83)？=?133973
NongliData(84)？=?1386
NongliData(85)？=?464219
NongliData(86)？=?605
NongliData(87)？=?2349
NongliData(88)？=?334123
NongliData(89)？=?2709
NongliData(90)？=?2890
NongliData(91)？=?267946
NongliData(92)？=?2773
NongliData(93)？=?592565
NongliData(94)？=?1210
NongliData(95)？=?2651
NongliData(96)？=?395863
NongliData(97)？=?1323
NongliData(98)？=?2707
NongliData(99)？=?265877
生成当前公历年、月、日？= = & gt？巩俐斯特
寇尔年？=?年份(截止时间)
柯月？=?月(时间)
curDay？=?日(下班时间)
巩俐斯特？=?寇尔年？& amp？"年份"
如果？(curMonth？& lt？10)?然后
巩俐斯特？=?巩俐斯特？& amp？"0"?& amp？柯月？& amp？“月亮”
其他
巩俐斯特？=?巩俐斯特？& amp？柯月？& amp？“月亮”
结束？如果
如果？(curDay？& lt？10)?然后
巩俐斯特？=?巩俐斯特？& amp？"0"?& amp？curDay？& amp？“日”
其他
巩俐斯特？=?巩俐斯特？& amp？curDay？& amp？“日”
结束？如果
起始时间1921 2月8日起天数:1921-2-8(正月初一)。
日期？=?(curYear？-?1921)?*?365?+?Int((curYear？-?1921)?/?4)?+?curDay？+?MonthAdd(curMonth？-?1)?-?38
如果？((curYear？Mod？4)?=?0?然后呢。柯月？& gt？2)?然后
日期？=?日期？+?1
结束？如果
计算农历的天干地支月日。
isEnd？=?0
m？=?0
做
如果？(NongliData(m)？& lt？4095)?然后
k？=?11
其他
k？=?12
结束？如果
n？=?k
做
如果？(n？& lt？0)?然后
退出？做
结束？如果
获取NongliData(m)的第n个二进制位的值
比特？=?NongliData(m)
为了什么？我？=?1?去哪？n？一步？1
比特？=?Int(bit？/?2)
然后
比特？=?比特？Mod？2
如果？(日期？& lt=?29?+?bit)？然后
isEnd？=?1
退出？做
结束？如果
日期？=?日期？-?29?-?少量
n？=?n？-?1
环
如果？(isEnd？=?1)?然后
退出？做
结束？如果
m？=?m？+?1
环
寇尔年？=?1921?+?m
柯月？=?k？-?n？+?1
curDay？=?日期
如果？(k？=?12)?然后
如果？(curMonth？=?(Int(NongliData(m)？/?65536)?+?1))?然后
柯月？=?1?-?克月
埃尔瑟夫？(curMonth？& gt？(Int(NongliData(m)？/?65536)?+?1))?然后
柯月？=?柯月？-?1
结束？如果
结束？如果
生成农历的天干地支生肖？= = & gt？非列表者
NongliStr？=?“农历”？& amp？天干(((curYear？-?4)?Mod？60)?Mod？10)?& amp？迪志(((curYear？-?4)?Mod？60)?Mod？12)?& amp？"年份"
NongliStr？=?NongliStr？& amp？"("?& amp？书香(((curYear？-?4)?Mod？60)?Mod？12)?& amp？")"
生成农历月和日？= = & gt？非liDayStr
如果？(curMonth？& lt？1)?然后
NongliDayStr？=?飞跃& amp？MonName(-1？*?curMonth)
其他
NongliDayStr？=?MonName(新月)
结束？如果
NongliDayStr？=?NongliDayStr？& amp？“月亮”
NongliDayStr？=?NongliDayStr？& amp？日名
农丽？=?NongliStr？& amp？非liDayStr
结束？功能