3

我在 Excel 2003 中编写了以下 VBA 代码来清除 Excel 工作表的内容;但它显示

运行时错误 438:对象不支持此属性或方法

这是我的代码,

Application.DisplayAlerts = False
Application.ScreenUpdating = False

Set wbk = Workbooks.Open("C:\a.xls")
wbk.Sheet1.Cells.ClearContents 'Error at this line
wbk.Save
wbk.Close

Application.DisplayAlerts = True
Application.ScreenUpdating = True

当excel不可见时,如果不支持wbk.Sheet1.Cells.ClearContents ,任何人都可以告诉我。不可见时如何清除Excel工作表的内容?

4

1 回答 1

4

我已经使用了以下内容,现在已经解决了!

wbk.Sheets("Sheet1").Cells.ClearContents
于 2012-12-27T17:00:11.437 回答