Åbn adgangskodebeskyttet fil via VBA

Anonim

Sådan omgår du en forespørgsel om adgangskode med VBA

Når du åbner en adgangskodebeskyttet projektmappe, beder Excel om denne adgangskode. Dette er naturligvis også ønsket, følgende figur viser, hvordan vinduet til indtastning af adgangskoden ser ud:

Når du åbner en projektmappe med en makro, er det naturligvis meget irriterende at indtaste adgangskoden. Du kan dog omgå adgangskodeforespørgslen med en makro. Brug følgende programkode:

Sub OpenPasswordFile ()
Dim Mappe Som arbejdsbog
Indstil Mappe = Application.Workbooks.Open (Filnavn: = "C: \ Files \ Protection file.xls", Password: = "Password")
Afslut Sub

Dette fungerer naturligvis kun, hvis du kender adgangskoden. For at gøre dette skal du erstatte teksten "Password" med den adgangskode, du har angivet. Ved at bruge objektvariablerne Folder du kan bruge denne variabel til let at få adgang til regnearkene i den aktuelt åbne projektmappe efter åbning af projektmappen.