宏未打开时自动运行

Question

Private Sub Workbook_Open()
Dim WB As Workbook

Set WB = ActiveWorkbook


WB.Sheets("Automation").Range("U23:W467").Select

Selection.ClearContents

End Sub

从我可以从SO收集的内容,当我打开工作簿时,此代码应自动清除这些单元格中的内容.但事实并非如此.当我进入代码时,一切正常,细胞被清除.

任何帮助表示赞赏!

Answer 1

子Workbook_Open()放置的代码在哪里？

如果你把它放在ThisWorkbook课堂上它应该运行.

如果你在常规代码模块中有它,它将不会使用该名称运行,但你可以调用sub Auto_Open()而它应该自动运行.