使用VBA从整个工作表中删除格式

Beh*_*ini 9 excel vba excel-vba

使用VBA,我试图清除所有活动工作表的所有格式.

Dim ws As Worksheet
 Set ws = ThisWorkbook.ActiveSheet
 With ws
           .ClearFormats
 End With
Run Code Online (Sandbox Code Playgroud)

但我收到以下错误:

在此输入图像描述

但是使用与.UsedRange相同的代码可以正常工作:

With .UsedRange
    .ClearFormats
End With
Run Code Online (Sandbox Code Playgroud)

你可以告诉我如何解决这个问题来整理整张表格!

chr*_*sen 22

ClearFormats是的一个方法Range,wereas ActiveSheet是一个Worksheet

你可以用

ThisWorkbook.ActiveSheet.Cells.ClearFormats
Run Code Online (Sandbox Code Playgroud)

(Cells是工作表中所有单元格的范围)