1、首先在开发工具中打开VBA编辑器
2、在工作表的单元格中输入一些内容，也可以空白出一些这些单元格，
3、在VBA编辑器中插入模块
4、在模块当中输入如下代码，然后运行Sub 填充区域空白单元格()Dim i As Range'Selection.Activate '可有可无的一句For Each i In Selection If i = "" Or i = "其他" Then i = "自定义内容" End IfNextEnd Sub
5、最后我们可以看到成功的在空白单元格当中填充了我们所设置的内容，
