Excel VBA循环浏览所有工作表并清除单元格内容
我有下面的代码,我不断得到运行时错误438,有人能帮我调试吗?谢谢Excel VBA循环浏览所有工作表并清除单元格内容,excel,vba,loops,Excel,Vba,Loops,我有下面的代码,我不断得到运行时错误438,有人能帮我调试吗?谢谢 Sub my sub () Dim wb As Workbook Set wb = Workbooks.Open(link to file) Dim ws As Worksheet For Each ws In wb ws.Cells.ClearContents Next End Sub 尝试: wb.工作表中每个ws的。 Option Explicit Sub Test() Dim ws As Works
Sub my sub ()
Dim wb As Workbook
Set wb = Workbooks.Open(link to file)
Dim ws As Worksheet
For Each ws In wb
ws.Cells.ClearContents
Next
End Sub
尝试:
wb.工作表中每个ws的
。
Option Explicit
Sub Test()
Dim ws As Worksheet
'Loop all sheet in the workbook
For Each ws In ThisWorkbook.Worksheets
'Clear the used range of the sheet
ws.UsedRange.Clear 'or .ClearContents
Next ws
End Sub