Öppna lösenordsskyddad fil via VBA

Anonim

Hur man kringgår en lösenordsfråga med VBA

När du öppnar en lösenordsskyddad arbetsbok frågar Excel efter detta lösenord. Detta är naturligtvis också önskvärt, följande bild visar hur fönstret för att ange lösenordet ser ut:

När du öppnar en arbetsbok med ett makro är det naturligtvis väldigt irriterande att ange lösenordet. Du kan dock kringgå lösenordsfrågan med ett makro. Använd följande programkod:

Sub OpenPasswordFile ()
Dim Mappe som arbetsbok
Ställ in Mappe = Application.Workbooks.Open (Filnamn: = "C: \ Files \ Protection file.xls", Lösenord: = "Lösenord")
Avsluta Sub

Naturligtvis fungerar detta bara om du känner till lösenordet. För att göra detta, ersätt texten "Lösenord" med det lösenord du har angett. Genom att använda objektvariablerna Mapp du kan använda denna variabel för att enkelt komma åt kalkylbladet i den öppna arbetsboken efter att du har öppnat arbetsboken.