Excel:如何清除除一张以外的所有工作表的内容

Question

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

我尝试将 ClearContents 更改为 Clear，但“运行时错误 '438':对象不支持此属性或方法。它特别突出显示了 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