Otvorite datoteku zaštićenu lozinkom putem VBA

Anonim

Kako zaobići upit lozinkom s VBA -om

Prilikom otvaranja radne knjige zaštićene lozinkom, Excel traži tu lozinku. To je naravno također poželjno, sljedeća slika prikazuje kako izgleda prozor za unos lozinke:

Kad otvorite radnu knjigu s makronaredbom, unos lozinke je naravno vrlo neugodan. Međutim, možete zaobići upit lozinkom pomoću makronaredbe. Upotrijebite sljedeći programski kod:

Sub OpenPasswordFile ()
Dim Mappe kao radna bilježnica
Postavite Mappe = Application.Workbooks.Open (Naziv datoteke: = "C: \ Datoteke \ Zaštitna datoteka.xls", Lozinka: = "Lozinka")
Kraj podm

Naravno, ovo funkcionira samo ako znate lozinku. Da biste to učinili, zamijenite tekst "Lozinka" lozinkom koju ste naveli. Korištenjem objektnih varijabli Mapa ovu varijablu možete koristiti za lak pristup radnim listovima trenutno otvorene radne knjige nakon otvaranja radne knjige.