macros未打开时自动运行

Private Sub Workbook_Open() Dim WB As Workbook Set WB = ActiveWorkbook WB.Sheets("Automation").Range("U23:W467").Select Selection.ClearContents End Sub 

从我可以从中收集，这个代码应该自动清除这些单元格中的内容，当我打开工作簿。 但是，它不。 当我进入代码一切工作正常，细胞被清除。

任何帮助表示赞赏！

Answer 1

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

如果你把它放在ThisWorkbook类中，它应该运行。

如果你在一个普通的代码模块中有它，它将不会以这个名字运行，但是你可以调用子Auto_Open()来代替它，它应该自动运行。