이 통합 문서가 선택된 활성 통합 문서가 포함 된 폴더를 열려면 한 번 클릭

이 방법은 Excel에서 열기 / 활성 통합 문서를 닫지 않고 삭제하는 VBA를 도입합니다. 다음과 같이하십시오 :

1. 누르세요 다른 + 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는 삭제할 수 없습니다. 그러나이 저장되지 않은 통합 문서를 닫아 직접 삭제할 수 있습니다.