李卓林的回答：

补充一下，hjj5118的意思我明白了。综合tangjiangli的答案，我教hjj5118做： 第一步，打开已有的表格，同时把这个网页也打开，稍后能用到这个公式。因为公式太长，必须得用复制，粘贴的方法，才保准。 第二步，复制公式，冒号后一个也不能落下。 即：=SUBSTITUTE(SUBSTITUTE(IF(A1<0,"负","")&TEXT(TRUNC(ABS(ROUND(A1,2))),"[DBNum2]")&"元"&IF(ISERR(FIND(".",ROUND(A1,2))),"",TEXT(RIGHT(TRUNC(ROUND(A1,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(A1,"0.00"))),"角","")&IF(LEFT(RIGHT(ROUND(A1,2),3))=".",TEXT(RIGHT(ROUND(A1,2)),"[DBNum2]")&"分",IF(ROUND(A1,2)=0,"","整")),"零元零",""),"零元","")。 第三步，双击进入A2，使A2单元格中有光标在闪，点粘贴。 第四步，回车。

李浩瀚的回答：

补充一下，hjj5118的意思我明白了。综合tangjiangli的答案，我教hjj5118做： 第一步，打开已有的表格，同时把这个网页也打开，稍后能用到这个公式。因为公式太长，必须得用复制，粘贴的方法，才保准。 第二步，复制公式，冒号后一个也不能落下。 即：=SUBSTITUTE(SUBSTITUTE(IF(A1<0,"负","")&TEXT(TRUNC(ABS(ROUND(A1,2))),"[DBNum2]")&"元"&IF(ISERR(FIND(".",ROUND(A1,2))),"",TEXT(RIGHT(TRUNC(ROUND(A1,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(A1,"0.00"))),"角","")&IF(LEFT(RIGHT(ROUND(A1,2),3))=".",TEXT(RIGHT(ROUND(A1,2)),"[DBNum2]")&"分",IF(ROUND(A1,2)=0,"","整")),"零元零",""),"零元","")。 第三步，双击进入A2，使A2单元格中有光标在闪，点粘贴。 第四步，回车。