Excel：如何清除除一个之外的所有工作表的内容

Question

我正在尝试清除MS Excel 2010中除“Dashboard”之外的所有工作表的内容，之后需要隐藏所有内容。 包含ClearContents的第二行代码以问题开头。

我尝试将ClearContents更改为Clear，但是“Run-time erro'438'：Object不支持此属性或方法。它特别突出了ws.Clear

' Clearing Contents
For Each ws In Worksheets
   If ws.Name <> "Dashboard" Then ws.ClearContents
Next

' Hiding sheets
For Each sh In ThisWorkbook.Worksheets
   If Not sh.Name = "Executive" Then sh.Visible = False
Next sh

Answer 1

问题是Worksheet对象没有.Clear或.ClearContents方法。这些是Range对象的方法。尝试这样的事情：

ws.UsedRange.ClearContents

Answer 2

您是否尝试过ws.Cells.ClearContents？