VBA运行时错误:清除Excel工作表的内容

时间:2012-12-26 09:36:06

标签: excel vba excel-vba excel-2003

我在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表格中隐藏的内容?

1 个答案:

答案 0 :(得分:4)

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

wbk.Sheets("Sheet1").Cells.ClearContents