二、用Excel提供的函数转换
个位为0,则不显示;不为0,显示XXX元;不为0、且角位和分位均为0,显示XXX元整;元角分位均为0,则显示零元整。 小数点后面第一位为0、且元位或分位有一为0,则不显示;为0、且元位和分位均不为0,则显示零;不为0,显示X角。 小数点后面第二位为0,则显示整;不为0,显示X分。 根据以上思路在B2中输入公式: IF(B1〈0,"金额为负无效",IF(OR(B1=0,B1=""),"(人民币)零元整")); IF(B1〈1,"(人民币)",TEXT(INT(B1),"[dbnum2](人民币)G/通用格式")&&"元")&&IF(INT(B1 10)-INT(B1) 10=0); IF(INT(B1) (INT(B1 100)-INT(B1 10) 10)=0,"","零"),TEXT(INT(B1 10)-INT(B1) 10,"[dbnum2]")&&"角")&&IF((INT(B1 100)-INT(B1 10) 10)=0,"整",TEXT((INT(B1 100)-INT(B1*10)*10),"[dbnum2]")&&"分")))。 确认后B2显示:(人民币)陆仟零伍拾元零玖分。以后使用时将公式复制到有关单元格中,若转换的对象B1发生了变化,可点击编辑→替换将B1替换掉。两种转换测试结果如图2所示。