如何使用VBA清除单元格样式太多问题

cccjjjddd

excel表格复制黏贴的时候，提示"不同的单元格样式太多"，要如何处理？

sub麻辣君

Sub test()
   Dim a As Style
   On Error Resume Next
   For Each a In ThisWorkbook.Styles
      If Not a.BuiltIn Then a.Delete
   Next
End Sub

cccjjjddd

sub麻辣君 发表于 2019-9-12 14:39
Sub test()
   Dim a As Style
   On Error Resume Next

多谢帮助!