Hoe controleer je of een bestand bestaat in een map en verwijder het vervolgens in Excel?

In deze tutorial leer je een VBA-script om te controleren of een bepaald bestand bestaat in een opgegeven map, en als dat zo is, om het te verwijderen uit de map in Excel.

Controleer of een bestand bestaat in een map en verwijder het in Excel met VBA-code

Het volgende VBA-script helpt om te controleren of een bepaald bestand bestaat in een map en het te verwijderen als het bestaat. Volg de onderstaande stappen.

1. Druk in een open Excel-werkboek op de toetsen Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen.

2. Klik in het Microsoft Visual Basic for Applications-venster op Invoegen > Module, en kopieer vervolgens het volgende VBA-script naar het Module (Code) venster.

VBA-code: Controleer of een bestand bestaat in een opgegeven map en verwijder het

Sub CheckFileThenDelete()
'Updated by Extendoffice 20221024
Dim FilePath As String
    FilePath = "C:\Users\Win10x64Test\Desktop\save attachments\aaa.xlsx"
    
    If Dir(FilePath) <> "" Then
    MsgBox "The file exists in the folder, click the OK button to delete it.", vbInformation, "Kutools for Excel"
        Kill FilePath
    Else
    If Dir(FilePath) = "" Then
    MsgBox "The file does not exist.", vbInformation, "Kutools for Excel"
    End If
    End If
End Sub

Opmerking: In de VBA-code is C:\Users\Win10x64Test\Desktop\save attachments\aaa.xlsx het pad van het bestand dat je wilt controleren op bestaan. In dit voorbeeld wil ik controleren of een Excel-bestand genaamd “aaa” bestaat in een map genaamd “save attachments” op het bureaublad. Je kunt het bestandspad en de bestandsextensie aanpassen aan jouw behoeften.

3. Druk op de F5-toets om de code uit te voeren.

4. Als het bestand bestaat, krijg je een Kutools voor Excel dialoogvenster te zien zoals in de onderstaande schermafbeelding. Klik op de OK-knop om dit bestand uit de map te verwijderen.

Als het bestand niet bestaat in de map, verschijnt er ook een ander Kutools voor Excel dialoogvenster om je te waarschuwen.