Πώς να εξαγάγετε ένα αρχείο Zip Με VBA

Γνωρίζοντας πώς να εξαγάγετε συμπιεσμένα αρχεία με τη Visual Basic for Applications ( VBA ) είναι καλή ικανότητα για να έχουν . Ένα συμπιεσμένο αρχείο περιέχει ένα ή περισσότερα συμπιεσμένα αρχεία και συνήθως χρησιμοποιείται για την αποθήκευση χώρο στο σκληρό δίσκο . Ένα πλεονέκτημα του ένα αρχείο zip είναι ότι μπορούν να μεταφερθούν πιο γρήγορα από τη μία τοποθεσία στην άλλη . VBA χρησιμοποιείται συνήθως σε εφαρμογές του Microsoft Office, όπως Excel , Access και το Word και σας δίνει την ευελιξία να αυτοματοποιήσουν τις κοινές επαναλαμβανόμενες εργασίες . Οδηγίες
Η

1 Ανοίξτε το Microsoft Excel και , στο πλαίσιο του « Tab Developer , " κάντε κλικ στο " Visual Basic ". Τύπος " Sub filesToUnzip ( ) " και πατήστε "Enter " για να δημιουργήσετε ένα νέο sub . 2

Τύπος "Dim oApplicationlication As Object

Dim fileName Όπως Παραλλαγή

dim folderFileName Όπως Παραλλαγή " για να δηλώσετε τις μεταβλητές
εικόνων 3

Τύπος . " fileName = Application.GetOpenFilename ( FileFilter : = " . Zip αρχεία ( * zip ) , * zip . " , MultiSelect : = " . για να ανοίξετε ένα παράθυρο του περιηγητή αρχείων και επιλέξτε το αρχείο zip για να αποσυμπιέσετε
Η 4

Τύπος " False ) folderFileName = " C : \\ UnzippedFiles " & " \\ "