1

「ダッシュボード」を除いて、MS Excel 2010のすべてのシートの内容をクリアしようとしています。その後、すべてを非表示にする必要があります。ClearContentsを含むコードの2行目は、問題から始まります。

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
4

2 に答える 2

4

.Clear問題は、Worksheetオブジェクトにまたは.ClearContentsメソッドがないことです。これらは範囲オブジェクトのメソッドです。代わりに次のようなものを試してください。

ws.UsedRange.ClearContents
于 2012-05-15T09:21:25.487 に答える
1

試しましたws.Cells.ClearContentsか？

于 2012-05-15T09:22:07.937 に答える