EXCEK中阿拉伯数字日期转换为中文大写方法.docx

1、EXCEK中阿拉伯数字日期转换为中文大写方法 EXCEK中阿拉伯数字日期转换为中文大写方法 EXCEK 中阿拉伯数字日期转换为中文大写方法 OFFICE 2019-02-14 19:53:53 阅读 58 评论 0 字号： 大中小 订阅 一、日期转换为中文大写 1、日期中年中文大写的公式设置 在表示年的单元格输入： =TEXT(MID(A5,1,1),DBNUM2)TEXT(MID(A5,2,1),DBNUM2)TEXT(MID(A5,3,1),DBNUM2)TEXT(MID(A5,4,1),DBNUM2) MID 函数是提取字符函数，公式中MID(A5,1,1)，表示从 A5 单元格数字左第

2、一个字符起提取一个 字 符 ， 结 果 是 2 。 TEXT函 数 将 阿 拉 伯 数 字 转 换 为 中 文 大 写 ， 公 式 中TEXT(MID(A5,1,1),DBNUM2)表示将2转换为贰。 整个公式由四个文本连接符号连接而成，结果是贰零零叁。 不能直接利用TEXT函数将2003转换为中文大写，因为TEXT(2003,DBNUM2)的结果是贰仟零叁，所以需将2003逐个数字转换为中文大写。 2、日期中月中文大写的公式设置 在表示月的单元格输入： =IF(B511,零TEXT(B5,DBNUM2),TEXT(B5,DBNUM2) IF 函数是一个条件判断函数，整个公式可以表述为： 如果

3、 B5 单元格月份数为 1-10 之间数字，则将该数字转换为中文大写的同时，在前面加零，如当前是 5 月，则结果是零伍，否则直接将 B5中月份数字转换为中文大写，如当前是 11 月，则结果是壹拾壹。 3、日期中日中文大写公式设置 在表示日的单元格输入： =IF(OR(C511,C5=20,C5=30),零TEXT(C5,DBNUM2),TEXT(C5,DBNUM2) 公式中OR(C511,C5=20,C5=30)表示C5 或者小于 11，或者等于 20，或者等于 30。 整个公式可以表述为： 如果 C5 或者小于 11，或者等于 20，或者等于 30，那么将 C5 中数字转换为中文大写的同时，

4、在前面加零，否则直接将 C5 转换为中文大写数字。 =IF(A5=10,TEXT(A5,拾),IF(A510,TEXT(A5,DBNUM2) =IF(A510,TEXT(MID(A5,1,1),拾)TEXT(MID(A5,2,1),DBNUM2) 二、转换年月日大写(以 A3 为例子) 1、年份的条件公式: =TEXT(MID(A3,1,1),DBNUM2)TEXT(MID(A3,2,1),DBNUM2)TEXT(MID(A3,3,1),DBNUM2)TEXT(MID(A3,4,1),DBNUM2) 2、月份的条件公式: (例 1-9-壹-玖 10-拾 11-12-拾壹-拾贰) =IF(A3=

5、10,TEXT(A3,拾),IF(A310,TEXT(A3,DBNUM2), IF(AND(A310, A313),TEXT(MID(A3,1,1),拾)TEXT(MID(A3,2,1),DBNUM2),) 3、日的条件公式: (例 1-9-壹-玖 10-拾 11-19-拾壹-拾玖 20-贰拾 21-29-贰拾壹-贰拾玖 30-叁拾 31-叁拾壹) =IF(A3=10,TEXT(A3,拾),IF(A310,TEXT(A3,DBNUM2), IF(AND(A310, A320),TEXT(MID(A3,1,1), 拾 )TEXT(MID(A3,2,1),DBNUM2), IF(A3=20,TEX

6、T(A3, 贰 拾 ), IF(AND(A320, A330),TEXT(MID(A3,1,1),贰拾)TEXT(MID(A3,2,1),DBNUM2), IF(A3=30,TEXT(A3,叁拾), IF(A3=31,TEXT(A3,叁拾壹),) 三、（1）转换年月日大写(导入 sheet1 表行 3 中有效日期起 K、L、M 三例的信息) 1、年份的条件公式: =TEXT(MID(SHEET1!K3,1,1),DBNUM2)TEXT(MID(SHEET1!K3,2,1),DBNUM2)TEXT(MID(SHEET1!K3,3,1),DBNUM2)TEXT(MID(SHEET1!K3,4,1)

7、,DBNUM2) 2、月份的条件公式: =IF(SHEET1!L3=10,TEXT(SHEET1!L3,拾),IF(SHEET1!L310,TEXT(SHEET1!L3,DBNUM2), IF(AND(SHEET1!L310, SHEET1!L313),TEXT(MID(SHEET1!L3,1,1),拾)TEXT(MID(SHEET1!L3,2,1),DBNUM2),) 3、日份的条件公式: =IF(Sheet1!M3=10,TEXT(Sheet1!M3,拾),IF(Sheet1!M310,TEXT(Sheet1!M3,DBNUM2), IF(AND(Sheet1!M310, Sheet1!M

8、320),TEXT(MID(Sheet1!M3,1,1),拾)TEXT(MID(Sheet1!M3,2,1),DBNUM2), IF(Sheet1!M3=20,TEXT(Sheet1!M3,贰拾), IF(AND(Sheet1!M320, Sheet1!M330),TEXT(MID(Sheet1!M3,1,1),贰拾)TEXT(MID(Sheet1!M3,2,1),DBNUM2), IF(Sheet1!M3=30,TEXT(Sheet1!M3,叁拾), IF(Sheet1!M3=31,TEXT(Sheet1!M3,叁拾壹),) 三、（2）转换年月日大写(导入 sheet1 表行 3 中有效日期

9、讫 N、O、P 三例的信息) 1、年份的条件公式: =TEXT(MID(SHEET1!N3,1,1),DBNUM2)TEXT(MID(SHEET1!N3,2,1),DBNUM2)TEXT(MID(SHEET1!N3,3,1),DBNUM2)TEXT(MID(SHEET1!N3,4,1),DBNUM2) 2、月份的条件公式: =IF(SHEET1!O3=10,TEXT(SHEET1!O3,拾),IF(SHEET1!O310,TEXT(SHEET1!O3,DBNUM2), IF(AND(SHEET1!O310, SHEET1!O313),TEXT(MID(SHEET1!O3,1,1),拾)TEXT

10、(MID(SHEET1!O3,2,1),DBNUM2),) 3、日份的条件公式: =IF(Sheet1!P3=10,TEXT(Sheet1!P3, 拾 ),IF(Sheet1!P310,TEXT(Sheet1!P3,DBNUM2), IF(AND(Sheet1!P310, Sheet1!P320),TEXT(MID(Sheet1!P3,1,1),拾)TEXT(MID(Sheet1!P3,2,1),DBNUM2), IF(Sheet1!P3=20,TEXT(Sheet1!P3,贰拾), IF(AND(Sheet1!P320, Sheet1!P330),TEXT(MID(Sheet1!P3,1,1

11、),贰拾)TEXT(MID(Sheet1!P3,2,1),DBNUM2), IF(Sheet1!P3=30,TEXT(Sheet1!P3,叁拾), IF(Sheet1!P3=31,TEXT(Sheet1!P3,叁拾壹),) 四、（1）转换年月日大写(导入 sheet1 表行 3 中有效日期起 I、J、K 三例的信息) 1、年份的条件公式: =TEXT(MID(SHEET1!I3,1,1),DBNUM2)TEXT(MID(SHEET1!I3,2,1),DBNUM2)TEXT(MID(SHEET1!I3,3,1),DBNUM2)TEXT(MID(SHEET1!I3,4,1),DBNUM2) 2、月

12、份的条件公式: =IF(SHEET1!J3=10,TEXT(SHEET1!J3,拾),IF(SHEET1!J310,TEXT(SHEET1!J3,DBNUM2), IF(AND(SHEET1!J310, SHEET1!J313),TEXT(MID(SHEET1!J3,1,1),拾)TEXT(MID(SHEET1!J3,2,1),DBNUM2),) 3、日份的条件公式: =IF(Sheet1!K3=10,TEXT(Sheet1!K3, 拾 ),IF(Sheet1!K310,TEXT(Sheet1!K3,DBNUM2), IF(AND(Sheet1!K310, Sheet1!K320),TEXT(

13、MID(Sheet1!K3,1,1),拾)TEXT(MID(Sheet1!K3,2,1),DBNUM2), IF(Sheet1!K3=20,TEXT(Sheet1!K3,贰拾), IF(AND(Sheet1!K320, Sheet1!K330),TEXT(MID(Sheet1!K3,1,1),贰拾)TEXT(MID(Sheet1!K3,2,1),DBNUM2), IF(Sheet1!K3=30,TEXT(Sheet1!K3,叁拾), IF(Sheet1!K3=31,TEXT(Sheet1!K3,叁拾壹),) 四、（2）转换年月日大写(导入 sheet1 表行 3 中有效日期讫 L、M、N 三例

14、的信息) 1、年份的条件公式: =TEXT(MID(SHEET1!L3,1,1),DBNUM2)TEXT(MID(SHEET1!L3,2,1),DBNUM2)TEXT(MID(SHEET1!L3,3,1),DBNUM2)TEXT(MID(SHEET1!L3,4,1),DBNUM2) 2、月份的条件公式: =IF(SHEET1!M3=10,TEXT(SHEET1!M3,拾),IF(SHEET1!M310,TEXT(SHEET1!M3,DBNUM2), IF(AND(SHEET1!M310, SHEET1!M313),TEXT(MID(SHEET1!M3,1,1),拾)TEXT(MID(SHEET

15、1!M3,2,1),DBNUM2),) 3、日份的条件公式: =IF(Sheet1!N3=10,TEXT(Sheet1!N3, 拾 ),IF(Sheet1!N310,TEXT(Sheet1!N3,DBNUM2), IF(AND(Sheet1!N310, Sheet1!N320),TEXT(MID(Sheet1!N3,1,1),拾)TEXT(MID(Sheet1!N3,2,1),DBNUM2), IF(Sheet1!N3=20,TEXT(Sheet1!N3,贰拾), IF(AND(Sheet1!N320, Sheet1!N330),TEXT(MID(Sheet1!N3,1,1),贰拾)TEXT(

16、MID(Sheet1!N3,2,1),DBNUM2), IF(Sheet1!N3=30,TEXT(Sheet1!N3,叁拾), IF(Sheet1!N3=31,TEXT(Sheet1!N3,叁拾壹),) 工作表中当前阿拉伯数字日期转换为中文大写方法 根据支票规定的年、月、日位置填写，因为在支票存根中已建立了出票日期信息，根据它来创建中文大写日期。 根据我国票据法有关规定，票据的出票日期必须使用中文大写。 为防止变造票据的出票日期，在填写月、日时，月为壹至壹拾的，日为壹至玖和壹拾、贰拾和叁拾的，应在其前加零。 根据这些特殊日期填写要求，在表中表示年月日的单元格分别设置公式如下： 日期中年中文大写

17、的公式设置 在表示年的I1单元格输入： =TEXT(MID(A5,1,1),DBNUM2)TEXT(MID(A5,2,1),DBNUM2)TEXT(MID(A5,3,1),DBNUM2)TEXT(MID(A5,4,1),DBNUM2)。 MID 函数是提取字符函数，公式中MID(A5,1,1)，表示从 A5单元格数字左第一个字符起提取一个字符，结果是2。 TEXT 函数将阿拉伯数字转换为中文大写，公式中TEXT(MID(A5,1,1),DBNUM2)表示将2转换为贰。 整个公式由四个文本连接符号连接而成，结果是贰零零叁。 我们不能直接利用 TEXT 函数将2003转换为中文大写，因为TEXT(

18、2003,DBNUM2)的结果是贰仟零叁，所以需将2003逐个数字转换为中文大写。 日期中月中文大写的公式设置 在表示月的 J1 单元格输入： =IF(B511,零TEXT(B5,DBNUM2),TEXT(B5,DBNUM2)。 IF 函数是一个条件判断函数，整个公式可以表述为： 如果 B5 单元格月份数为 1-10 之间数字，则将该数字转换为中文大写的同时，在前面加零，如当前是 5 月，则结果是零伍，否则直接将B5 中月份数字转换为中文大写，如当前是 11 月，则结果是壹拾壹。 日期中日中文大写公式设置 在 表 示 日 的K1单 元 格 输 入 ： =IF(OR(C511,C5=20,C5=

19、30), 零TEXT(C5,DBNUM2),TEXT(C5,DBNUM2)。 公式中OR(C511,C5=20,C5=30)表示C5 或者小于 11，或者等于 20，或者等于 30。 整个公式可以表述为： 如果 C5 或者小于 11，或者等于 20，或者等于 30，那么将 C5 中数字转换为中文大写的同时，在前面加零，否则直接将 C5 转换为中文大写数字。 英文大小写互换 =UPPER(A2) 小写换大写 =LOWER(A2) 大写换小写 =PROPER(A2) 首字大写 根据支付结算办法要求： 票据的出票日期必须使用中文大写。 为防止变造票据的出票日期，在填写月、日时，月为壹、贰和壹拾的，日

20、为壹至玖和壹拾、贰拾和叁拾的，应在其前加零；日为拾壹至拾玖的，应在其前加壹。 如 1 月 15 日，应写成零壹月壹拾伍日。 再如 10 月 20 日，应写成零壹拾月零贰拾日。 一般在填写票据年份时，是直接用四个中文大写数字来填写的，如2008应写为贰零零捌。 因此，在进行函数设计的时候，我们必须对四位年度数字进行逐位转换，对月、日的转换可直接使用 Excel 提供的中文数字显示格式并判断是否应在数字前加零就可以了。 现在假定使用当前日期为票据的签发日期，那么相应的中文大写日期函数如下： =TEXT(MID(YEAR(TODAY(),1,1),dbnum2)TEXT(MID(YEAR(TODAY

21、(),2,1),dbnum2)TEXT(MID(YEAR(TODAY(),3,1),dbnum2)TEXT(MID(YEAR(TODAY(),4,1),dbnum2)年IF(OR(MONTH(TODAY()=2,MONTH(TODAY()=10),零,)TEXT(MONTH(TODAY(),dbnum2)月IF(OR(DAY(TODAY()=10,DAY(TODAY()=20,DAY(TODAY()=30),零,)TEXT(DAY(TODAY(),dbnum2)日 本处使用函数，除前面已经介绍过的 TEXT 函数外，TODAY()是取当前日期函数,YEAR()、MONTH()、DAY()分别为

22、取相应日期的年、月、日函数，MID(text,start_num,num_chars)函数是从文本Text 中第 Start_num 个字符起取 Num_chars 个字符。 以下为本人简化的公式： =TEXT(B7,yyyydbnum2年)IF(OR(MONTH(B7)3,MONTH(B7)=10),零,)TEXT(B7,mdbnum2月)IF(OR(DAY(B7)11,DAY(B7)=20,DAY(B7)=30),零,)TEXT(B7,d 日dbnum2) =SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(TEXT(B7,yyyy 年 mm 月 dd

23、 日dbnum2),壹拾月,零壹拾月),壹拾日,零壹拾日),贰拾日,零贰拾日),叁拾日,零叁拾日) 1. =TEXT( B7, yyyy 年I F( OR( MONTH( B7) 3, MONTH( B7) =10) , 零, ) m月I F( OR( DAY( B8) 11, DAY( B8) =20, DAY( B8) =30) , 零, ) d 日 dbnum2 ) =TEXT(MID(YEAR(B7),1,1),dbnum2)TEXT(MID(YEAR(B7),2,1),dbnum2)TEXT(MID(YEAR(B7),3,1),dbnum2)TEXT(MID(YEAR(B7),4,1

24、),dbnum2)年IF(OR(MONTH(B7)=2,MONTH(B7)=10),零,)TEXT(MONTH(B7),dbnum2)月IF(OR(DAY(B7)=10,DAY(B7)=20,DAY(B7)=30),零,)TEXT(DAY(B7),dbnum2)日 在 Excel 里日期转换成大写 10 标签： excel,日期,大写 在 Excel 里日期转换成大写 日期中月中文大写的公式设置？ 月份为 1-10 月时，前面必须加零 。 例如 8 月，零捌月。 10 月，零壹拾月。 运用 如 A7=A3 的年 和 C7=C3 的日 随 B3 自动变化而=B7 的月份变化而自动转换成 1-10 月时，前零。 11 月=壹拾壹月、12月=壹拾贰月。 享受得到 回答:3 人气:3 解决时间:2019-04-09 19:41 满意答案 好评率： 100% 公式 =IF(B7=9,TEXT(B7,dbnum2),IF(B7=10,零TEXT(B7,dbnum2),TEXT(B7,dbnum2)月，若有问题 47728719 提问人的追问 2019-04-02 10:37 1-9 月 前面没加零 回答人的补充 2019-04-02 10:40 =IF(B7=10,零TEXT(B7,dbnum2),TEXT(B7,dbnum2)月