Åpne passordbeskyttet fil via VBA

Anonim

Hvordan omgå et passord med VBA

Når du åpner en passordbeskyttet arbeidsbok, ber Excel om dette passordet. Dette er selvfølgelig også ønsket, følgende figur viser hvordan vinduet for å skrive inn passordet ser ut:

Når du åpner en arbeidsbok med en makro, er det selvfølgelig veldig irriterende å skrive inn passordet. Du kan imidlertid omgå passordforespørselen med en makro. Bruk følgende programkode:

Sub OpenPasswordFile ()
Dim Mappe Som arbeidsbok
Sett Mappe = Application.Workbooks.Open (Filnavn: = "C: \ Files \ Protection file.xls", Passord: = "Passord")
Slutt Sub

Selvfølgelig fungerer dette bare hvis du kjenner passordet. For å gjøre dette, erstatt teksten "Passord" med passordet du har angitt. Ved å bruke objektvariablene Mappe du kan bruke denne variabelen til å enkelt få tilgang til regnearkene i den nåværende åpne arbeidsboken etter at du har åpnet arbeidsboken.