|
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
以下是引用nb330106在2003-12-24 20:16:00的发言:
放到自动更正你面啊,命名名称。
以后你输入名称,会自动改成函数。 函数太长了,后面部分粘贴不上。怎么办?如:
="大写金额:"&IF(A1=0,"",IF((A1-ROUND(A1,0))=0,(TEXT(INT(A1),"[DBnum2]")&"元正"),(TEXT(INT(A1),"[DBnum2]")&"元")&IF((RIGHT(A1,2)-RIGHT(A1,1))=0,"零",TEXT(ROUND((INT(((A1-INT(A1))*100)-RIGHT(A1,1))/10),0),"[dbnum2]")&"角")&IF((A1*10-INT(A1*10))=0,"",TEXT(ROUND(((A1*10-INT(A1*10))*10),0),"[dbnum2]")&"分")&"正")),
我试着用aa替代前部分,用bb替代后部分,再用zz替代aa和bb ,但是用zz=aa+bb不行,用zz=aa&bb不行,用zz=aa*bb也不行。望大师再次赐教!!! |
|