특정 폴더에 파일이 있는지 확인하고 있으면 Excel에서 삭제하는 방법은 무엇입니까?

이 튜토리얼에서는 특정 파일이 지정된 폴더에 있는지 확인하고, 만약 그렇다면 Excel에서 해당 폴더에서 삭제하는 VBA 스크립트를 배우게 됩니다.

VBA 코드를 사용하여 특정 폴더에 파일이 있는지 확인하고 삭제하기

다음 VBA 스크립트는 특정 파일이 폴더에 있는지 확인하고, 존재한다면 삭제하는 데 도움이 됩니다. 아래 단계를 따르세요.

1. 열려 있는 Excel 통합 문서에서 Alt + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2. Microsoft Visual Basic for Applications 창에서 삽입 > 모듈을 클릭한 다음, 다음 VBA 스크립트를 모듈(코드) 창에 복사합니다.

VBA 코드: 특정 폴더에 파일이 있는지 확인하고 삭제하기

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

참고: VBA 코드에서 C:\Users\Win10x64Test\Desktop\save attachments\aaa.xlsx는 존재 여부를 확인하려는 파일의 경로입니다. 이 예제에서는 바탕화면의 'save attachments'라는 폴더에 'aaa'라는 이름의 Excel 파일이 있는지 확인하려고 합니다. 필요에 따라 파일 경로와 확장자를 변경할 수 있습니다.

3. 코드를 실행하기 위해 F5 키를 누릅니다.

4. 파일이 존재하면 아래 스크린샷과 같이 Kutools for Excel 대화 상자가 나타납니다. 이 파일을 폴더에서 제거하려면 확인 버튼을 클릭하세요.

파일이 폴더에 존재하지 않는 경우, 다른 Kutools for Excel 대화 상자가 팝업되어 이를 알립니다.