mynewspapers.net

Hur till extraktet en zip-fil med vba

Hur till extraktet en zip-fil med vba


Att veta hur man extrahera zip-filer med Visual Basic for Applications (VBA) är god färdighet att ha. En zip-fil innehåller en eller flera komprimerade filer och ofta används för att spara utrymme på hårddisken. En fördel med en zip-fil är att det kan överföras snabbare från en plats till en annan. VBA är vanligt förekommande i Microsoft Office-program som Excel, Access och Word och ger dig flexibiliteten att automatisera vanliga repetitiva uppgifter.

Instruktioner

• Öppna Microsoft Excel och klicka på "Visual Basic." under "Fliken utvecklare" Skriv "Sub filesToUnzip()" och tryck "Enter" för att skapa en ny sub.

• Typ "Dim oApplicationlication som objekt Dim filnamn som Variant Dim folderFileName som Variant" att deklarera variabler.

• Typ "filnamn = Application.GetOpenFilename (filefilter: =" Zip-filer (* .zip), * .zip ", MultiSelect: = False)" att öppna en fil webbläsare och välja att packa upp zip-filen.

• Typ "folderFileName ="C:\UnzippedFiles"&"\"MkDir folderFileName Set oApplication = CreateObject("Shell.Application")" att skapa en målmapp för de uppackade filerna.

• Typ "oApplication.Namespace(folderFileName). CopyHere oApplication.Namespace (filnamn) .items"extrahera zip-filer. Typ "MsgBox"Du har extraherat den zip arkivera till C:\UnzippedFiles\", vbInformation" att visa ett meddelande att filerna extraheras framgångsrikt.

• Typ "End Sub" om det behövs. Kör din nya sub för att extrahera filer från zip-filen.