1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑器中插入模块

4、在模块当中输入如下代码,然后运行
Sub 查找替换关键词()
Dim i As Range
Range("A1:G21").Activate '激活一个区域,也可以使用鼠标选择一个区域,然后省了这句
For Each i In Selection
If i = "" Or i = "自定义内容" Then
i = "替换结果"
End If
Next
End Sub

5、最后就可以看到我们成功的替换了相应的关键词,
