Å vite hvordan du pakker ut zippede filer med Visual Basic for Applications ( VBA ) er god ferdighet å ha . En zip-fil inneholder en eller flere komprimerte filer og er ofte brukt for å spare harddiskplass. En fordel med en glidelås fil er at det kan overføres hurtigere fra ett sted til et annet . VBA er vanligvis brukes i Microsoft Office-programmer som Excel , Access og Word , og gir deg fleksibilitet til å automatisere vanlige rutineoppgaver . Instruksjoner
en

Åpne Microsoft Excel , og under " Developer Tab, " klikk på " Visual Basic. " Type " Sub filesToUnzip ( ) " og trykk "Enter " for å lage en ny sub .
2

Type " Dim oApplicationlication som objekt

Dim filnavn As Variant

Dim folderFileName Som Variant fileName = Application.GetOpenFilename ( FileFilter " å erklære variabler
3

Type. " : = " . . zip-filer ( * zip ) , * zip" , MultiSelect : = false) "for å åpne en fil browser vinduet og velg zip-filen for å pakke
4

Type. " folderFileName = "C : \\ UnzippedFiles " & "\\ "

mkdir folderFileName

Set oApplication = CreateObject ( " Shell.Application ") "for å lage en målmappe for de utpakkede filene .
5

Type" oApplication.Namespace ( folderFileName ) . CopyHere oApplication . namespace (filnavn ) . elementer " for å pakke ut komprimerte filer . Type " MsgBox" Du har pakket ut zip-filer til C: \\ UnzippedFiles \\ " , vbInformation " for å vise en melding om at filene pakket ut vellykket
6

type "End Sub " om nødvendig. . Kjør dine nye sub å pakke ut filer fra din zip-fil .