excel用宏实现自动替换？一、首先是打开需要操作的excel文件。二、按电脑键盘组合键ctrl+f。或者使用office编辑上的查找替换功能。点击【替换】按钮，输入需要替换的内容。三、选中需要替换的列，可以在需要替换的列中，点击向下箭头，那么，excel用宏实现自动替换？一起来了解一下吧。
Option Explicit
Sub 转换游告()
Dim dict, arr, i, j, k
dict = Sheets(1).UsedRange '字典关羡腊系表
arr = Sheets(2).UsedRange '需要转换的表
For i = 2 To UBound(arr)
For j = 3 To 5
For k = 1 To UBound(dict)
If dict(k, 1) = arr(i, j) And dict(k, 3) = arr(1, j) Then
神派明 arr(i, j) = dict(k, 2)
Exit For
End If
Next k
Next j
Next i
Sheets(2).UsedRange = arr '回写转换结果
End Sub
鼠标移至工作表标签名岁盯好处，右键，查看代码，则宽将下列代码粘贴进去\x0d\x0aSub 替换()\x0d\x0a For i = 1 To [H65536].End(xlUp).Row\x0d\x0a Cells(i, 8).Replace What:="beijing", Replacement:="北京"\x0d\x0a Cells(i, 8).Replace What:="shanghai", Replacement:="上海"\x0d\x0a Cells(i, 8).Replace What:="xinjiang", Replacement:="新疆"\x0d\x0a Cells(i, 8).Replace What:="", Replacement:="江乎铅西"\x0d\x0a Next\x0d\x0aEnd Sub\x0d\x0a退出VB窗口，ALT+F8，运行替换宏。
只有这两种羡桥耐情况？不用VBA也能实现。
即A列设置自定义格式：[=1]"消晌王五兄春";[=2]"赵六";
一、快捷方式：按Ctrl+F打开“查找和替换”对话框并激活“查找”选项卡，按Ctrl+H打开“查找和替换”对话框并激活“替换”选项卡。
二、使用通配符：
在Excel的查找和替换中使用星号“*”可查找任意字符串，例如 查找“Excel* ”可找到“Excel函数”和“Excel公式”等。 使用问号可查找任意单个字符。例如 查找“VB?” 可找到“VBA”和“VBE”等。
三、查找通配符：
如果在Excel中要查找通配符，可以输入“~*”、“~?”。“~”为波浪号，在数字键“1”的左边。如果要查找“~”，则输入两个波浪号“~~”。
四、在指定的区域中查找：
先选定一个区域，再打开“查找和替换”对雀郑晌话框，则查找的范围仅限于选定的区域。
五、在整个工作簿中进行查找：
在“查找和替换”对话框中单击“选项”按钮，在“范围”右侧的下拉列表中选择“工作簿”，则Excel会在工作簿中的所有工作表中进行查找。
六、在工作组中进行查找：
如果仅选择了工作簿中的部分工作表，这些工作表将成为一个工作组，Excel会丛毕仅在这些工作表中进行查找。
七、按单元格格式查找：
单击“查找和替换”对话框中“格式”按钮右侧的小箭头，在弹出的下拉列表中选择“从单元格选择格式”，然后选择一个包含所需查找格式的单元格，即可按选定的格式进行查找。
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
Select Case Target.Value
Case 1
Target = "王五"
Case 2
Target = "赵六"
End Select
End If
End Sub
'使用说明
'按Alt+F11，在左侧双击你的工作表，把代码贴到右边的拦燃窗口卜衡知即可型消
以上就是excel用宏实现自动替换的全部内容，一、快捷方式：按Ctrl+F打开“查找和替换”对话框并激活“查找”选项卡，按Ctrl+H打开“查找和替换”对话框并激活“替换”选项卡。二、使用通配符：在Excel的查找和替换中使用星号“*”可查找任意字符串，内容来源于互联网，信息真伪需自行辨别。如有侵权请联系删除。
