Excel VBA per eliminare tutti i file in una cartella

October 7

Excel VBA per eliminare tutti i file in una cartella


I programmatori spesso creano file temporanei utilizzati nelle loro applicazioni, ed è buona pratica di programmazione per eliminare questi file quando non sono più in uso. In Visual Basic, Applications Edition, il "uccidere" dichiarazione è disponibile per eliminare i file da un disco. Questa affermazione prende un argomento che specifica uno o più nomi di file da cancellare. L'argomento supporta anche wild card, come "*" per specificare più file da eliminare in una cartella.

istruzione

1 Avviare Excel, fare clic sulla scheda "Sviluppatore" e fare clic su "Visual Basic" per aprire l'editor di Visual Basic. Fare clic sul menu "Inserisci" e fare clic su "modulo" per aggiungere un nuovo modulo.

2 Creare un nuovo sub-procedimento nel modulo aggiungendo la seguente codice VBA:

Private Sub deleteAllFiles ().

3 Digitare il seguente codice per creare una nuova variabile e definire il percorso per i file:

Dim filePath As String

filePath = "C: \ Temp * *."

4 Utilizzare la seguente riga di codice per eliminare tutti i file nella cartella definita: Uccidi filePath.

5 Terminate la sottoprocedura digitando "End Sub". Premere il tasto "F5" per eseguire la procedura.