Odprite datoteko, zaščiteno z geslom, prek VBA

Kako zaobiti poizvedbo gesla z VBA

Ko odprete delovni zvezek, zaščiten z geslom, Excel zahteva to geslo. To je seveda tudi zaželeno, naslednja slika prikazuje, kako izgleda okno za vnos gesla:

Ko odprete delovni zvezek z makrom, je vnos gesla seveda zelo moteč. Poizvedbo gesla pa lahko zaobidete z makrom. Uporabite naslednjo programsko kodo:

Sub OpenPasswordFile ()
Dim Mappe kot delovni zvezek
Nastavite Mappe = Application.Workbooks.Open (Ime datoteke: = "C: \ Datoteke \ Zaščitna datoteka.xls", Geslo: = "Geslo")
End Sub

Seveda to deluje le, če poznate geslo. Če želite to narediti, besedilo "Geslo" zamenjajte z geslom, ki ste ga navedli. Z uporabo spremenljivk objekta Mapa to spremenljivko lahko uporabite za enostaven dostop do delovnih listov trenutno odprtega delovnega zvezka po odprtju delovnega zvezka.