如何在宏Excel中检测打开的Excel文件？

Question

如何检测所有打开的Excel文件并通过它们来锁定它们的工作表？

我有一个包含宏的Excel文件。一旦启动，它将遍历我所有打开的excel文件，并通过设置密码来锁定它们的表单。

不知道如何从VBA中检测打开的Excel文件。

Answer 1

您只需要在Application：

中循环工作簿

Dim wB as WorkBook
Dim wS as WorkSheet

For Each wB in Application.WorkBooks
    For Each wS in wB.Sheets
        wS.Protect "password"
    Next wS
Next wB