在EXCEL中如何使用数字替代汉字快速录入信息

在EXCEL中如何使用数字替代汉字快速录入信息

在使用EXCEL录入数据时，对于一些固定的如果能用数字代码来代替一些固定的汉字字串字词我们可以使用固定数字代码来替代，减少误差提高效率。

以下图为例，我们需要在B列输入人员对应的职称。

职称包括初级、中级、副高、正高这四个级别。

在EXCEL选项中将“开发工具”勾选。

之后在菜单栏依次点击“开发工具”、“Visual Basic”进入VBA代码书写界面。

因为我们要处理的数据在SHEET2中，所以我们在左侧双击“Sheet2（Sheet2）”打开代码界面。

之后在右侧的代码窗口中分别选择Worksheet对象和Change事件。

接下来进行代码的输入操作。输入如下代码

If Target.Column = 2 Then

If Target.Value = 0 Then

Target.Value = "初级"

End If

If Target.Value = 1 Then

Target.Value = "中级"

End If

If Target.Value = 2 Then

Target.Value = "副高"

End If

If Target.Value = 3 Then

Target.Value = "正高"

End If

关闭代码比那机器，返回EXCEL主界面。在B列输入数字并回车，可以看到数字自动转换为对应的职称。