Excel 如果A1等于1，则B1等于“一”，A2等于2，则B2等于“二”

2024-11-20 22:40:37

推荐回答（5个）

回答1：

用自定义函数可以完成。

例如有数据表如图：

第一步：点击开发工具-visual basic

第二步：插入模块，编制代码如下：

Function dasz(a As Integer) As String

Set d = CreateObject("scripting.dictionary")

d.Add 1, "一"

d.Add 2, "二"

d.Add 3, "三"

d.Add 4, "四"

d.Add 5, "五"

d.Add 6, "六"

d.Add 7, "七"

d.Add 8, "八"

d.Add 9, "九"

d.Add 10, "十"

dasz = d(a)

End Function

第三步：在B1输入公式：=dasz(A1)。

第四步：将B1公式下拉至B10.结果如图：

回答2：

直接用函数不会。但可以间接达到目的：

在B1输入公式=A1，然后向下拖动B列复制公式，达到A列输入什么数字B列就自动填充什么数字的效果。然后选中B列，格式菜单-单元格-数字选项卡-特殊-中文小写数字，如图所示：

如果数字三位数以上显示####的话请把B列拉宽即可。

回答3：

先在B1输入公式，"=A1"，然后设置B1单元格格式，设置成中文小写，就Ok了。

回答4：

设置B1=A1,B2=A2,同时设置B列数字格式为特殊－中文小写数字，相信你能做到的！

回答5：

右键设置单元格数字特殊中文大写确定