在EXCEL里面,如何在单元格里输入一个字,就自动变成另外一个字？
如：我在A1中输入数字 “1”按回车后 A1就自动变成“姓名”，在B1中输入数字“2”，按回车后，B1就自动
变成“职位”等
EXCEL 有一个自动拼写纠正功能，并且可以自己定义词条。以Office2010为例，点击文件-选项-自动更正选项，在“自动更正”窗口中，替换（R）下面写上“1”，为（W）写上“姓名”，按“添加”按钮，这样就设定了1自动修改为“姓名”的自动更正词条，每次输入1都会自动改为“姓名”。但是要注意的是这个永久生效，这样就无法输入“1”了，所有你应该建立一些特殊的词条例如“xy1”对于“姓名”，这样会比较好。下面是截图：
温馨提示：答案为网友推荐，仅供参考
第1个回答 2020-12-31
在一个单元格中输入一个产品编号，自动在另一个单元格里自动填写上我原先设定好的价格可以使用VLOOKUP函数进行匹配。
软件工具：Excel 2013
1、首先需要建立一个设定好的价格数据库。为方便管理，新建一个工作表命名为“原始数据”。并录入好设定好的价格。预设的数据编号与体格对应行。
2、返回表1，假设A2为输入，B2为输出显示。在B2中输入=VLOOKUP(A2,原始数据!A2:B17,2,FALSE)按下回车键。Ps:快照之处是为方便解答、对比截取原始数据中快照。
3、在A2中输入预设的编号。B2中就会自动显示原始数据表中预设的价格。
公式解释：
1、函数公式：VLOOKUP(A2,原始数据!A2:B17,2,FALSE)
2、【A2】表示要查找的值。即用户输入编号所在的单元格。
3、【原始数据!A2:B17】表示要在其中查找值的区域。要在“原始数据!A2:B17”这里查找“A2”的值 。
4、【2】表示区域中包含返回值的列号。表示要匹配“原始数据!A2:B17”中的第2列。
5、【FALSE】表示精确匹配，原始数据中的编号和用户输入编号完全一致。本回答被网友采纳
软件工具：Excel 2013
1、首先需要建立一个设定好的价格数据库。为方便管理，新建一个工作表命名为“原始数据”。并录入好设定好的价格。预设的数据编号与体格对应行。
2、返回表1，假设A2为输入，B2为输出显示。在B2中输入=VLOOKUP(A2,原始数据!A2:B17,2,FALSE)按下回车键。Ps:快照之处是为方便解答、对比截取原始数据中快照。
3、在A2中输入预设的编号。B2中就会自动显示原始数据表中预设的价格。
公式解释：
1、函数公式：VLOOKUP(A2,原始数据!A2:B17,2,FALSE)
2、【A2】表示要查找的值。即用户输入编号所在的单元格。
3、【原始数据!A2:B17】表示要在其中查找值的区域。要在“原始数据!A2:B17”这里查找“A2”的值 。
4、【2】表示区域中包含返回值的列号。表示要匹配“原始数据!A2:B17”中的第2列。
5、【FALSE】表示精确匹配，原始数据中的编号和用户输入编号完全一致。本回答被网友采纳
第2个回答 推荐于2016-05-19
三种方法：
1、用today（)函数 但要设置 迭代计算 由于和其他文件需要的设置不同 有些麻烦
2、用宏，Worksheet_Change事件
3、最简单的是在需要日期的单元格上按住ctrl再按；（即ctrl+；）
建议用后2种办法
附上代码 工具-》宏-》 vb编辑器-》双击左侧树型目录的sheet1，然后在右侧代码区复制一下内容。假设A列输入，B列显示日期
Private Sub Worksheet_Change(ByVal Target As Range)
Dim iRow As Integer
Dim iCol As Integer
iRow = Target.Row
iCol = Target.Column
If iCol = 1 And Target.Offset(0, 1) = "" Then
Target.Offset(0, 1) = Date
End If
End Sub
1、用today（)函数 但要设置 迭代计算 由于和其他文件需要的设置不同 有些麻烦
2、用宏，Worksheet_Change事件
3、最简单的是在需要日期的单元格上按住ctrl再按；（即ctrl+；）
建议用后2种办法
附上代码 工具-》宏-》 vb编辑器-》双击左侧树型目录的sheet1，然后在右侧代码区复制一下内容。假设A列输入，B列显示日期
Private Sub Worksheet_Change(ByVal Target As Range)
Dim iRow As Integer
Dim iCol As Integer
iRow = Target.Row
iCol = Target.Column
If iCol = 1 And Target.Offset(0, 1) = "" Then
Target.Offset(0, 1) = Date
End If
End Sub
第3个回答 推荐于2017-12-16
可以用宏来解决。录制一个宏，内容是在单元格里输入“姓名”这两个字，然后对这个宏设定一个快捷键，以后每次按快捷键，就会自动输入“姓名”了。
除了用“宏”之外，还可以用另一个软件“按键精灵”来实现这种功能。本回答被网友采纳
除了用“宏”之外，还可以用另一个软件“按键精灵”来实现这种功能。本回答被网友采纳
第4个回答 2012-10-24
没有这种公式吧。你可以都按自己规定的代码先输入好了统一替换啊。比如全部输入完把“1”统一替换成“姓名”。否则按楼上自动更正的方法，以后没法输入数字了，还要改回来，更麻烦
相似回答