Vba

Liebe/-r Experte/-in,

nach langer Tüftelei muss ich nun an euch wenden und Hilfe einholen.
Ich habe folgendes Problem in VBA.
Aus meinem Excel-Arbeitsblatt, das auch im Ordner C:\Daten liegt, sollen mittels CommandButton Dateien vom selben Datum paarweise (also hier „med200910081.zip“ und „med200910082.zip“) in den selben Ordner entzippt werden.

Danach soll der Name der Dateien z.B. „med200910081.zip“ (es reicht wenn nach der Prüfung auf Vorhandensein eine von beiden vorliegt) in der Form 20091008 beginnend (also ersten drei Textzeichen weg und letzte Zahl weg) mit Zelle B1 bis zur letzten besetzten Zeile kopiert werden und als Textdatei mit Namen 20091008.txt im Ordner C:\Textdaten so gespeichert werden, das Werte in der Tabelle bis zur letzten Zeile durch ein Komma getrennt werden.

Danach wird mit einer Schleife nach den nächsten Datenpaaren gesucht mit einer BsgBox, wenn einer von beiden Dateien nicht vorhanden, es reichte also wenn eine vorhanden ist.

Ich bedanke mich jetzt für eure hilfreichen Tipps.
Beste Grüße, Sergen