本帖最后由 mosz 于 2012-3-21 12:45 编辑
特别感谢六楼的年华同学，仔细看了帮助后，获益良多，很久没有关注，才发现自己的方法复杂到几点，现整理出简洁方法，展现给大家，再次感谢。
效果：
例如：2012-03-20；输出为：二〇一二日三月二十日
方法一：（适用于6.5、7.0版本）
设计器单元格：
A1:=FORMAT(TODAY(),"yyyy-MM-dd")
A2:=REPLACE(NUMTO(YEAR(A1),true),"零","〇")+"年"+NUMTO(MONTH(A1),false)+"月"+NUMTO(DAY(A1),false)+"日"
PS：使用中文日期，直接调用A2单元格即可，或者在A1单元格的公式形态里设置A2的公式。
方法二：（适用于6.2等老版本）
设计器单元格：
A1:=FORMAT(TODAY(),"yyyy-MM-dd")
A2:=if(LEN(MID(A1,1,1))>0,if(MID(A1,1,1)!=0,NUMTO(TOINTEGER(MID(A1,1,1))),"〇"),"〇")
A3:=if(LEN(MID(A1,2,1))>0,if(MID(A1,2,1)!=0,NUMTO(TOINTEGER(MID(A1,2,1))),"〇"),"〇")
A4:=if(LEN(MID(A1,3,1))>0,if(MID(A1,3,1)!=0,NUMTO(TOINTEGER(MID(A1,3,1))),"〇"),"〇")
A5:=if(LEN(MID(A1,4,1))>0,if(MID(A1,4,1)!=0,NUMTO(TOINTEGER(MID(A1,4,1))),"〇"),"〇")
A6:=if(LEN(MID(A1,6,1))>0,if(MID(A1,6,1)==0,"",if(MID(A1,6,1)==1,"十",if(MID(A1,6,1)==2,"二十",if(MID(A1,6,1)==3,"三十","")))),"")
A7:=if(LEN(MID(A1,7,1))>0,NUMTO(TOINTEGER(MID(A1,7,1))),"")
A8:=if(LEN(MID(A1,9,1))>0,if(MID(A1,9,1)==0,"",if(MID(A1,9,1)==1,"十",if(MID(A1,9,1)==2,"二十",if(MID(A1,9,1)==3,"三十","")))),"")
A9:=if(LEN(MID(A1,10,1))>0,NUMTO(TOINTEGER(MID(A1,10,1))),"")
A10:=CONCATENATE(A2,A3,A4,A5,"年",A6,A7,"月",A8,A9,"日")
PS：使用中文日期时，直接调用A10单元格就可以了，小小技巧，免费共享，希望能减少大家在设计过程中的小麻烦，期望得到大家的分享，共同提高。
|
