Question

我刚刚开始编码，我正在尝试使用所有dim变量，因为这是每个人都在说的用法。所以，我试图使用当前区域清除格式（基本上所有单元格都包含值或格式）。这是我的代码，我收到编译错误，VBA突出显示＆＃34;整个＆＃39;最后一段代码的一部分。有什么想法吗？我是新人，我无法弄清楚我做错了什么。

Sub ClearFormatting()
    Dim ws as Worksheet
    Dim Entire As Range
    Set ws = ThisWorkbook.Sheets("Sheet1")
    Set Entire = Range("A1").CurrentRegion
    ws.entire.ClearFormats
End Sub

Answer 1

Sub ClearFormatting()

    Dim ws as Worksheet
    Dim Entire As Range

    Set ws = ThisWorkbook.Sheets("Sheet1")

    Set Entire = ws.Range("A1").CurrentRegion

    Entire.ClearFormats 'no ws.

End Sub

清除所有值单元格的格式Dim Range VBA Issue

1 个答案: