Excel转化货币数字为中文大写:例如:
效果图:
代码:
=
IF
(D8
<
1
,
IF
(D8
<
0.1
,TEXT(
INT
(D8
*
100
),
"
[DBNum2]G/通用格式
"
)
&
"
分
"
,
IF
((
INT
(D8
*
100
)
-
INT
(D8
*
10
)
*
10
=
0
),TEXT(
INT
(D8
*
10
),
"
[DBNum2]G/通用格式
"
)
&
"
角整
"
,TEXT(
INT
(D8
*
10
),
"
[DBNum2]G/通用格式
"
)
&
"
角
"
&
TEXT(
INT
(D8
*
100
)
-
INT
(D8
*
10
)
*
10
,
"
[DBNum2]G/通用格式
"
)
&
"
分
"
)),TEXT(
INT
(D8),
"
[DBNum2]G/通用格式
"
&
"
元
"
)
&
IF
((
INT
(D8
*
10
)
-
INT
(D8)
*
10
)
=
0
,
IF
((
INT
(D8
*
100
)
-
INT
(D8
*
10
)
*
10
)
=
0
,
""
,
"
零
"
),
IF
((
INT
(D8
*
0.1
)
-
INT
(D8)
*
0.1
)
=
0
,
"
零
"
,
""
)
&
TEXT(
INT
(D8
*
10
)
-
INT
(D8)
*
10
,
"
[DBNum2]G/通用格式
"
)
&
"
角
"
)
&
IF
((
INT
(D8
*
100
)
-
INT
(D8
*
10
)
*
10
)
=
0
,
"
整
"
,TEXT(
INT
(D8
*
100
)
-
INT
(D8
*
10
)
*
10
,
"
[DBNum2]G/通用格式
"
)
&
"
分
"
))
这个奖可以结合ASPOSE.Cells处理我的报表导出Excel的汇总,计算问题:报表中的Excel操作之Aspose.Cells(Excel模板) 唯一需要改变的就是D8这个单元汇总格是需要动态变更的,可以利用{r}。{-n},{c}等来处理。
本文转自破狼博客园博客,原文链接:http://www.cnblogs.com/whitewolf/archive/2011/03/26/1996192.html,如需转载请自行联系原作者