关于EXCEL表格用数字代替汉字的方法？

发布网友发布时间：2023-10-07 22:10

共3个回答

热心网友时间：2023-11-10 07:57

此乃需要VBA实现你愿望也！！！！

右键SHEET名，查看代码，其他条件参照修改，添加，切记！！！

复制

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    Application.EnableEvents = False
    For Each c In Target.Cells
        With c
        For i = 1 To 30
         If Cells(i, 1) = 1 Then '判断是否在第1列(a列)输入数据.

          .Value = "张三"
            End If


            If Cells(i, 1) = 2 Then

          .Value = "李四"
            End If

               If Cells(i, 1) = 3 Then

          .Value = "王五"
            End If

            Next
         End With
    Next
    Application.EnableEvents = True
End Sub

追问朋友，我按你说的还是不会呀，我将电子档发给你，你帮我做好我学习下好吗？怎么不能添加附件呀

追答

头像上有邮箱。

热心网友时间：2023-11-10 07:58

比如，我sheet2中的A列和B列分别写了工号和姓名，在sheet1中，我在某一列输入了工号，我要当前的输入工号自动转化为姓名。注意是当前输入的单元随着输入变化。
我使用=INDIRECT("sheet2!B"&A2) 这个只能解决其他列内容的变化随着A列的内容的变化，而不是当前输入单元的变化。楼下提到用自动更正选项，不能限定输入的列。如果没有其他答案，分数赠送。追问你这是采用了两张表格，我想就用一张表格，两张表的我也会做。

热心网友时间：2023-11-10 07:58

部分数字和字母是不能直接作为定义的名称的！
建议你使用字母和数字的组合作为定义的名称！