以下是引用LangQueS在2007-11-28 17:41:47的发言:本人使用Excel初期“潜心钻研”的公式(转8位数字日期为支票日期并默认当前日期),共计1000个字符!
=IF(A3="",TEXT(MID(YEAR(TODAY()),1,1),"[DBNum2]G/通用格式")&TEXT(MID(YEAR(TODAY()),2,1),"[DBNum2]G/通用格式")&TEXT(MID(YEAR(TODAY()),3,1),"[DBNum2]G/通用格式")&TEXT(MID(YEAR(TODAY()),4,1),"[DBNum2]G/通用格式")&"年"&IF(MID(RIGHT(MONTH(TODAY())+100,2),1,1)="0",TEXT(MID(RIGHT(MONTH(TODAY())+100,2),1,1),"[DBNum2]G/通用格式")&TEXT(MID(RIGHT(MONTH(TODAY())+100,2),2,1),"[DBNum2]G/通用格式"),TEXT(RIGHT(MONTH(TODAY())+100,2),"[DBNum2]G/通用格式"))&"月"&IF(MID(RIGHT(DAY(TODAY())+100,2),1,1)="0",TEXT(MID(RIGHT(DAY(TODAY())+100,2),1,1),"[DBNum2]G/通用格式")&TEXT(MID(RIGHT(DAY(TODAY())+100,2),2,1),"[DBNum2]G/通用格式"),TEXT(RIGHT(DAY(TODAY())+100,2),"[DBNum2]G/通用格式"))&"日",TEXT(MID($A3,1,1),"[DBNum2]G/通用格式")&TEXT(MID($A3,2,1),"[DBNum2]G/通用格式")&TEXT(MID($A3,3,1),"[DBNum2]G/通用格式")&TEXT(MID($A3,4,1),"[DBNum2]G/通用格式")&"年"&IF(VALUE(MID($A3,5,2))<10,"零"&TEXT(MID($A3,5,2),"[DBNum2]G/通用格式")&"月",TEXT(MID($A3,5,2),"[DBNum2]G/通用格式")&"月")&IF(VALUE(MID($A3,7,2))<10,"零"&TEXT(MID($A3,7,2),"[DBNum2]G/通用格式")&"日",TEXT(MID($A3,7,2),"[DBNum2]G/通用格式")&"日"))