Excel 에서 현재 워크북(현재 파일)을 삭제하는 방법은 무엇입니까？

이 방법은 Excel 에서 열린 상태의 현재 워크북을 닫지 않고 삭제하는 VBA 를 소개합니다。 다음 단계를 따르십시오。

1. Alt+F11키를 동시에 눌러 Microsoft Visual Basic for Applications 창을 엽니다。

2. 삽입>모듈을 클릭하고， 다음 VBA 코드를 복사하여 열린 모듈 창에 붙여넣습니다。

VBA: Excel 에서 닫지 않고 현재 워크북 삭제하기

Sub DeleteActiveWorkbook()
Dim xFullName As String
xFullName = Application.ActiveWorkbook.FullName
ActiveWorkbook.Saved = True
Application.ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill xFullName
Application.ActiveWorkbook.Close False
End Sub

3. F5키를 누르거나실행버튼을 눌러 이 VBA 를 실행합니다。

참고 사항:

(1) 이 VBA 는 현재 워크북을 삭제할 수 있지만 Excel 창은 닫을 수 없습니다。 현재 워크북이 삭제된 후 열려 있는 통합문서가 없다면 Excel 창을 직접 닫아 주십시오。

(2) 현재 워크북이 이전에 저장된 적이 없다면, 이 VBA 로는 해당 파일을 삭제할 수 없습니다。 하지만 저장되지 않은 이 통합문서는 직접 닫아서 삭제할 수 있습니다。