Alle Dateien eines Ordners in eine ZIP-Datei kopieren

Question

Hallo zusammen,

mein Problem hat mit Excel VBA zu tun. Ich habe hier schon einen Code gefunden, dieser erzeugt aber für jede Datei in meinem Zielordner eine eigene ZIP-Datei. Ich benötige aber alle Dateien in einer Zip-Datei

Gibt es jemanden er mir hier helfen kann?

Vielen Dank schon mal.

Gruß Michi

Answer 1

Hi Michi,

mit 7-Zip geht das relativ einfach:

Sub Makro_7zip()
	Shell ("C:\Program Files\7-Zip\7z.exe a C:\DestinationFolder\test7.zip C:\SourceFolder\*.* -r")
End Sub

Gruß

Stefan

---

Freiberufler im Bereich Softwareentwicklung Von der PLC und Robotik zu VB.NET & C#, vorrangig WPF und UWP

Answer 2

Hallo Stefan,

den Code kenne ich auch. Folgendes Probleme habe ich. Am Arbeitsrechner habe ich Windows 10. Dort ist ja kein WinZip installiert (habe es zumindest nicht gefunden).

Ich kann ja aber mit der rechten Maustaste einen Zip Ordner erstellen.

Gibt es sonst noch eine andere Möglichkeit?

Gruß Michi

Answer 3

Schau mal hier, funktioniert in VBA. Musst du dir lediglich an deine Anforderungen anpassen.

Gruß

---

Freiberufler im Bereich Softwareentwicklung Von der PLC und Robotik zu VB.NET & C#, vorrangig WPF und UWP