Excel VBA til Slet alle filer i en mappe

September 18

Excel VBA til Slet alle filer i en mappe

Computer programmører ofte skabe midlertidige filer, der bruges i deres ansøgninger, og det er godt programmering praksis at slette disse filer, når de ikke længere er i brug. I Visual Basic for Applications, den "Kill" erklæring er tilgængelig til at slette filer fra en disk. Denne erklæring har et argument, der angiver et eller flere filnavne, der skal slettes. Argumentet understøtter også wild cards som "*" for at angive flere filer, der skal slettes i en mappe.

Vejledning


• Start Excel, klik på fanen "Udvikler" og klik "Visual Basic" for at åbne Visual Basic Editor. Klik på "Indsæt" menuen og klik på "Modul" for at tilføje et nyt modul.

• Opret en ny sub-procedure i dit modul ved at tilføje følgende VBA-kode: Private Sub deleteAllFiles ().

• Indtast følgende kode til at oprette en ny variabel og definere stien til dine filer: Dim sti As String filsti = "C:. \ Temp \ * *"

• Brug følgende linje kode til at slette alle filerne i den mappe, du definerede: Dræb filsti.

• Afslut din sub-procedure ved at skrive "End Sub". Tryk på "F5" for at udføre proceduren.