Damit Dein Ordner beim Schliessen der aktuellen Arbeitsmappe automatisch gelöscht wird musst Du in das Modul "Diese Arbeitsmappe" folgenden Code eingeben:
Private Sub Workbook_Beforeclose(Cancel As Boolean)
Kill ("c:\test\*.*")
RmDir ("c:\test")
End Sub
Beim Schliessen der Mappe werden zunächst alle Dateien im Ordner c:\test und anschliessend der Ordner selbst gelöscht.
Gruss Daniel
Danke
28.12.2005 13:55:20
lexika
Hi,
vielen Dank
wünsch Euch nen guten Rutsch ins neue Jahr
Gruß
lexika