Excel VBA Zip Dateien entpacken?

Ich möchte mehrere Zip-Ordner (alle in einem Ordner) entpacken lassen. Diese haben alle ähnliche Namen (Stundendaten...). Sie sollen nach dem entpacken die Zip Ordner ersetzen, sodass ich in dem Ordner dann nur noch die entpackten Ordner und keine Zip mehr habe.

Danke schonmal im voraus :)

2 Antworten

TechPech1984

Nutzer, der sehr aktiv auf gutefrage ist

im Thema Computer

06.12.2021, 09:02

hier mal eine anleitung von vielen

https://www.amdtown.com/ZNXK5VEP/

Suboptimierer

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

Microsoft Excel

06.12.2021, 09:28

Ich wäre zu faul, das selbst zu programmieren. Ich würde ein Zip-Tool verwenden (z. B. 7-zip oder WinRar) und schauen, was für Parameter man zum Entpacken von Archiven übergeben kann. Dann rufst du mit einem gewöhnlichen Shell.Run oder wie auch immer der Befehl heißen mag das Zip-Tool parameterisiert auf.

Hey,

Ich habe sehr viele Zip-Dateien die ich gleichzeitig entpacken möchte. Dabei soll für jede Zip Datei automatisch ein neuer Ordner angelegt werden in den die Dateien entpackt werden. Ich habe schon versucht alle Dateien gleichzeitig auszuwählen und dann bei "Winrar" mit "Dateien entpacken..." zu entpacken doch die Dateien werden alle nur in ein Ordner entpackt. Was kann ich machen?

...zur Frage

Excel VBA: Alle Dateien in einem Ordner nacheinander (sequentiell) aktualisieren?

Hallo liebe Excelprofis,

bislang habe ich es nur hingekriegt, via VBA eine Datei zu öffnen, die dortige Datenabfrage zu aktualisieren und wieder zu schließen:

Sub UpdateExcelFile()
  Dim wb As Workbook
   
  Set wb = Workbooks.Open("C:\Users\Vorname Nachname\Desktop\Ordner der Testabfragen\Testabfrage 1.xlsx")
  ActiveWorkbook.RefreshAll
  Application.CalculateUntilAsyncQueriesDone 'VBA-Code warten lassen, bis die Aktualisierung abgeschlossen ist
  wb.Save
  wb.Close
End Sub

Nun habe ich aber nicht nur eine Datei in dem (definierten) Ordner, sondern mehrere, die genauso wie oben geöffnet, aktualisiert und geschlossen werden sollen. Eine exakte Zahl kann ich nicht nennen, da es fortlaufend immer mehr Dateien werden. Allerdings befinden sich in dem Ordner nur xlsx-Dateien.

Aus Performancegründen möchte ich die Dateien hintereinander und nicht gleichzeitig bearbeitet haben. Der Beispielordner bleibt derselbe (Ordner der Testabfragen). Idealerweise folgt eine Mitteilung zum Ende, wenn die letzte Datei im Ordner wieder geschlossen wurde. Wie würde der Code dafür lauten?

Vielen Dank für eure Unterstützung!

...zur Frage

Mehrere zip / rar dokumente gleichzeitig entpacken, wie geht das?

Hallo!

Habe einen Ordner mit ca 2000 WinRAR archiven (.7z). In den Archiven sind ca 16.000 Dateien, die ich alle in einen einzigen Ordner entpacken möchte. Markiere ich alle, so kann ich entweder nur die allererste Datei entpacken oder unter "extract each archive into separate folder" zwar alle entpacken, aber dann entstehen nur 2000 Ordner. Jemand eine Idee wie ich sofort alle Dateien entpacken kann?

...zur Frage

Excel Vba Selbstzerstörung?

Hallo zusammen,

gibt es einen Vba Code welche eine Selbstzerstörung beinhaltet. Dabei sollen alles was in der excel Datei ist gelöscht werden.

danke im Voraus !

...zur Frage

Excel fortlaufende Rechnungsnummer?

Hallo,

ich möchte in Excel jedes mal wenn ich die Rechnungs-Vorlage öffne, die nächste Rechnungsnummer eingetragen haben.

Meine Rechnungen sind alle in einem Ordner gespeichert.

Ich habe schon versucht mit VBA ein Script zu schreiben, welches alle Dateien in dem Ordner durchgeht und den Wert aus Zelle B13 nimmt und den höchsten am ende mit +1 in die Vorlage einträgt.

Da bin ich aber leider gescheitert :-)

Vielleicht kennt sich einer von euch da besser aus und könnte mit weiterhelfen.

Vielen Dank im Vorraus,

LG, Julian

...zur Frage

Treiber Ordner löschen nach Installation?

Kann man ohne Bedenken den Ordner mit den Treibern löschen, nachdem man diese installiert hat ? Ich meine nicht den Zip-Ordner, sondern den bereits entpackten.
Danke im Voraus!

...zur Frage

Linux: nur "einen" Ordner aus zip Archiv entpacken?

Hallo,

ich muss, unter Linux, aus einem zip Archiv einen Ordner entpacken, das Archiv enthält, zusammen mit dem Ordner noch zwei Dateien, die ich aber nicht entpacken möchtet.

Archiv:

Datei01
Datei02
Ordner

Meine Versuche mit
unzip -d oder -j "Archiv" "Ordner" haben nicht funktioniert (ich habe auch "nur" Beispiele dazu mit Dateien gefunden).

Vielen Dank im voraus für Eure Hilfe.
Gruß Carpy

...zur Frage

EXCEL VBA Nach Wert suchen und Zeile ersetzen?

Hallo zsm

Ich habe einen Festen Wert Zb. 4. Ich möchte nun die anderen Werte welche sich in der Zeile befinden genau bei der 4 in einem anderen Tabellenblatt ersetzen lassen.

Wie funktioniert das?

...zur Frage

Excel VBA: Wie kann ich mehrere Zeilen in einem Bereich ausblenden?

WENN in A3:A1000 "x" steht, sollen diese Zeilen eingeblendet bleiben,

WENN in A3:A1000 " " steht, sollen diese Zeilen ausgeblendet werden.

Vielen Dank

...zur Frage

Programmieren in Excel (VBA) Hilfe gesucht?

Wir müssen in Excel etwas mit VBA programmieren, und ich bräuchte dabei ein bisschen Hilfe.

Wir sind bei dem neuen Thema das wir Excel Tabellen mit VBA bearbeiten und ich kenne mich dort leider noch nicht so gut aus.

Bei dem Beispiel sollen die Fehlstunden der Schüler per Schaltfläche erhöht werden können.

In Excel sieht das ganze dann so aus:

Unter der 4 und der 2 sollte dann noch eine Schaltfläche vorhanden sein.

Ich danke für eure Hilfe! :)

...zur Frage

Kann man keine Zip Dateien mit WinSCP entpacken?

Hallo,

ich habe jetzt WinSCP und damit kann man einwandfrei Dateien hochladen, aber wenn ich einen Ordner hochlade, den ich brauche, dauert es um die 12h. Wenn ich allerdings nur die Zip Datei hochlade, habe ich das in ein paar Min erledigt. Nur habe ich jetzt die Zip-Datei hochgeladen und kann sie nicht entpacken. Geht das generell nicht oder nur mit WinSCP nicht?

...zur Frage

Excel Vba, Bilder löschen?

Hallo, gibt es eine Möglichkeit in excel vba alle Bilder auf dem Tabellenblatt mit einer Ausnahme zu löschen? Also alle Bilder bis auf ein definiertes sollen gelöscht werden.

...zur Frage

Excel-VBA: Andere, geöffnete Excel-Datei speichern?

Hallo zusammen,

Ich denke, eine sehr einfache Frage für VBA-Experten, die ich durch googlen aber nicht lösen kann.

Ich habe 2 verschiedene Excel-Dateien (bsp. '1.xls' & '2.xls').

Beide Dateien sind in Excel geöffnet.

Ich möchte jetzt per Button in '1.xls' die zweite Datei (also '2.xls') speichern können.

Folgendes habe ich getestet, was nicht funktioniert:

Dateinameneu = Range("H6") & "-" & 2.xls.Name
2.xls.SaveAs "C://Dokumente/"&Dateinameneu

Ich kenne das leider nur mit "ActiveWorkbook.Saveas", aber ich will ja die andere Datei speichern.

WICHTIG! 'Saveas' muss es sein, da die Datei '2.xls' wie ihr in dem Codebeispiel sehen könnt, nachher anders heißen soll.

Danke im Voraus!

Dennis

...zur Frage

Daten aus VBA Formular in Excel Tabelle übertragen?

Halloo,

ich hoffe ihr könnt mir helfen.

ich muss für meine Arbeit eine Excel Tabelle mit Formular erstellen. Die Daten die in das Formular eingetragen wurden sollen sortiert nach Spalte in die vorgefertigte Excel Tabelle eingefügt werden. Wie kann ich das Programmieren?

ich danke im Voraus!

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen