|
<P><FONT size=2> 在制作凭证或者填写支票时,在大写金额的后边,需要分格填写阿拉伯数字格式的金额,并在数字的前一空格内加人民币符号“¥”,当然仍可根据存根中金额信息设置公式,分别在V4至M4单元格设置公式
<P> 其中公式也许有不尽合理的地方(如在制作凭证中可能会出现红数,如何用负数代替等等)或者有更简单的写法,不妨拿出来讨论讨论!!</P>
<P>设置公式如下:</P>
</FONT>
<p>
<P><B><FONT size=2>“</FONT></B><FONT size=2><B>分</B><B>”位公式设置</B>:在“分”单元格V4输入:=MID(A7*100,LEN(A7*100),1)。LEN函数是计算字符串中字符的个数函数,公式中“LEN(A7*100)”表示计算“A7*100”的字符个数,结果是“7”。MID函数是提取字符函数,整个公式表示A7*100结果中从左起第7个字符提取一个字符,结果是“8”。
<p></FONT>
<p>
<P><B><FONT size=2>“</FONT></B><FONT size=2><B>角</B><B>”位公式设置:</B>在“角”单元格U4输入:=MID(A7*100,LEN(A7*100)-1,1),公式表示从A7*100中第六位提取一个字符,结果为“2”。
<p></FONT>
<p>
<P><B><FONT size=2>“</FONT></B><FONT size=2><B>元</B><B>”位公式设置</B>:在“元”单元格T4输入:=MID(A7*100,LEN(A7*100)-2,1),计算结果是“6”。
<p></FONT>
<p>
<P><B><FONT size=2>“</FONT></B><FONT size=2><B>十元</B><B>”位公式设置</B>:在“十元”单元格S4输入:=MID(A7*100,LEN(A7*100)-3,1),计算结果是“6”。
<p></FONT>
<p>
<P><B><FONT size=2>“</FONT></B><FONT size=2><B>百元</B><B>”位公式设置</B>:在“百元”单元格R4输入:=IF(A7>=100,MID(A7*100,LEN(A7*100)-4,1),"¥"),从百元以后的公式中除基本设置相同外,还加了一个条件判断函数IF,因为根据支票填写要求,必须在金额的前一个空格内加人民币符号“¥”。整个公式可以表述为:如果金额大于或等于100,即“百元”位有数字,那么该单元格就是该数字,否则为“¥”。
<p></FONT>
<p>
<P><B><FONT size=2>“</FONT></B><FONT size=2><B>千元</B><B>”位公式设置</B>:在“千元”位单元格Q4输入:=IF(R4="¥","",IF(A7>=1000,MID(A7*100,LEN(A7*100)-5,1),"¥"))。整个公式可以表述为:如果后一个单元格有人民币符号“¥”,则该单元格为空白,如果该单元格大于或等于1000,则该单元格为“千元”位数字,否则为“¥”。
<p></FONT>
<p>
<P><B><FONT size=2></FONT></B><FONT size=2><B>“</B><B>万元”</B><B>位公式设置</B>:在“万元”单元格P4输入:=IF(OR(R4="¥",Q4="¥"),"",IF(A7>=10000,MID(A7*100,LEN(A7*100)-6,1),"¥")),其中“OR(R4="¥",Q4="¥")”表示或者R4=“¥”或者Q4=“¥”。
<p></FONT>
<p>
<P><B><FONT size=2>“</FONT></B><FONT size=2><B>十万元</B><B>”位设置公式</B>:在O4输入:=IF(OR(R4="¥",Q4="¥",P4="¥")," ",IF(A7>=100000,MID(A7*100,LEN(A7*100)-7,1),"¥"))。
<p></FONT>
<p>
<P><B><FONT size=2>“</FONT></B><FONT size=2><B>百万元</B><B>”位设置公式</B>:在N4输入:=IF(OR(R4="¥",Q4="¥",P4="¥",O4="¥"),"",IF(A7>=1000000,MID(A7*100,LEN(A7*100)-8,1),"¥"))。
<p></FONT>
<p>
<P><B><FONT size=2>“</FONT></B><FONT size=2><B>千万元</B><B>”位设置公式</B>:在M4输入:=IF(OR(R4="¥",Q4="¥",P4="¥",O4="¥",N4="¥"),"",IF(A7>10000000,MID(A7*100,LEN(A7*100)-9,1),"¥"))。
<p></FONT>
<p>
<P><FONT size=2>通过以上编制支票套打工具或凭证制作模板,旨在介绍许多Excel常用函数的应用。同时,用Excel</FONT><FONT size=2>自编的支票套打工具,虽涉及函数较多,但远没编程的复杂,且简便易用,不失为会计人员实用工具,若对此感兴趣,赶快行动起来做一个吧!</FONT></P>
<P>
<p>
[此贴子已经被作者于2004-6-7 12:19:13编辑过] |
|