Nwlapcug.com


Excel VBA per eliminare tutti i file in una cartella

Excel VBA per eliminare tutti i file in una cartella


Programmatori di computer spesso creano file temporanei utilizzati nelle loro applicazioni, ed è buona programmazione pratica per eliminare questi file quando non sono più in uso. In Visual Basic per applicazioni, l'istruzione di "Kill" è disponibile per eliminare i file da un disco. Questa istruzione accetta un argomento che specifica uno o più nomi di file da eliminare. L'argomento supporta anche caratteri jolly come "*" per specificare più file da eliminare in una cartella.

Istruzioni

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 scegliere "Modulo" per aggiungere un nuovo modulo.

2

Creare una nuova Sub-procedura di nel vostro modulo aggiungendo il seguente codice VBA:

Private Sub deleteAllFiles().

3

Digitare il codice seguente 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: uccidere filePath.

5

Completare la Sub-procedura di digitando "End Sub". Premere "F5" per eseguire la procedura.