怎么把一个单元格内非宋体九号的内容清除,只保留宋体九号的内容?

2026年09月25日 04:26

有1个网友回答

网友（1）：

亲，这个只有用VBA编程解决。

注意！！！！！！运行前请务必备份你的源文件。

打开你的Excel文件，按“Alt+F11”打开VBA编辑窗口，然后在左侧对应的Sheeet上双击，右侧空白处粘贴下面的代码。关闭VBA窗口。然后按“Alt+F8”打开宏窗口，选择刚插入的宏，点击“执行”。

Sub QC()
Dim rg As Range
For Each rg In UsedRange
    If rg.Font.Name <> "宋体" Or rg.Font.Size <> 9 Then rg.Clear
Next
End Sub