Otevřete soubor chráněný heslem prostřednictvím VBA

Jak obejít dotaz na heslo pomocí VBA

Při otevírání sešitu chráněného heslem Excel o toto heslo požádá. To je samozřejmě také žádoucí, následující obrázek ukazuje, jak vypadá okno pro zadání hesla:

Když otevřete sešit pomocí makra, je zadání hesla samozřejmě velmi otravné. Dotaz na heslo však můžete obejít pomocí makra. Použijte následující kód programu:

Sub OpenPasswordFile ()
Dim Mappe jako sešit
Nastavit Mappe = Application.Workbooks.Open (Název souboru: = "C: \ Files \ Protection file.xls", Heslo: = "Heslo")
End Sub

Samozřejmě to funguje, pouze pokud znáte heslo. Chcete -li to provést, nahraďte text „Heslo“ zadaným heslem. Pomocí objektových proměnných Složka Tuto proměnnou můžete použít k snadnému přístupu k listům aktuálně otevřeného sešitu po otevření sešitu.