1、首先在开发工具中打开VBA编辑器
2、在单元格区域当中输入一些内容作为例子
3、在VBA编辑器中插入模块
4、在模块当中输入如下代码，然后运行Sub 查找替换关键词()Dim i As RangeRange("A1:G21").Activate '激活一个区域，也可以使用鼠标选择一个区域，然后省了这句For Each i In Selection If i = "" Or i = "自定义内容" Then i = "替换结果" End IfNextEnd Sub
5、最后就可以看到我们成功的替换了相应的关键词，
