excel中使用vba来对单元格格式进行查找显示

1、首先我们打开一个工作样表作为例子。

2、打开vba编辑器，并插入一个新的模块。在喋碾翡疼模块编辑器中输入以下代码：Sub 查找指定格式() Wit茑霁酌绡h Application.FindFormat.Font .Name = "宋体" .FontStyle = "Bold" .Size = 11 End With Cells.Find(what:="", SearchFormat:=True).Activate Selection.Interior.ColorIndex = 4 '加亮显示End Sub

3、我们使用Application.FindFormat.Font这个函数设置其参数为字体为宋体，字形加粗，字号为11。

4、然后在单元格内查找，并激活该单元格。这里有一行参数what：=“”表示的是空值，因为查找命令的查找内容是必需参数，所以这个参数必须这样写，其他的参数可以直接用逗号“，”占位省略。

5、Selection.Interior.ColorIndex将查找到的单元格修改格式绿色底纹，参数4是绿色的下标，大家可以对应颜色下标进行不同的设置。

6、最后我们来看一下效果，插入一个控件按钮，指定宏，然后运行。可以看到这个代码的实际运行效果。这里需要提醒大家的事，该代码查找格式完全匹配才行。

7、先写到这里了，谢谢大家的观看。祝大家生活愉快。小编还有许多其他的经验可以观看，如果无法解决问题可以联系小编进行咨询。看不清楚图片的可以点击放大再看哦。