Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Dateien suchen und löschen

Dateien suchen und löschen
René
Hallo liebe Excelgemeinde,
gibt es eine Möglichkeit in einem bestimmten Verzeichnis alle Dateien zu suchen die mit AW: oder RW: anfangen und diese per Knopfdruck (Commandbutton mit Makro) zu löschen ?
Bin für jede Hilfe dankbar.
MfG René
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Dateien suchen und löschen
23.01.2011 15:06:09
Josef

Hallo René,
Achtung! Es erfolgt keine Rückfrage, die Dateien sind entgültig weg!

Private Sub CommandButton1_Click()
  Dim strPath As String, strFile As String
  
  strPath = "E:\Forum"
  
  strPath = IIf(Right(strPath, 1) = "\", strPath, strPath & "\")
  
  strFile = Dir(strPath & "?W*", vbNormal)
  
  Do While strFile <> ""
    
    If strFile Like "AW*" Or strFile Like "RW*" Then
      Kill strPath & strFile
    End If
    
    strFile = Dir
  Loop
  
End Sub

Gruß Sepp

Anzeige
AW: Dateien suchen und löschen
23.01.2011 15:35:10
Rene
Hallo Sepp,
zu erst einmal herzlichen Dank. Ich werde es gleich testen und gebe wieder bescheid
MfG René
AW: Dateien suchen und löschen
23.01.2011 15:55:02
Rene
Hallo Sepp,
funktioniert super. Herzlichen Dank noch mal und einen schönen Sonntag.
MfG René
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige