특정 시간 동안 비활성 상태일 때 Excel 파일을 자동으로 저장하고 닫는 방법은 무엇입니까?

예를 들어, 공유 디스크에 Excel 파일을 놓아두는 경우, 한 사용자가 파일을 여는 동안 다른 사용자는 통합 문서를 편집할 수 없습니다. 따라서 특정 시간 동안 비활성 상태일 때 파일을 자동으로 닫아 다른 사람들의 작업을 원활하게 하려면 어떻게 해야 할까요? 이 기사는 VBA 방법으로 도와드리겠습니다.

VBA 코드를 사용하여 특정 시간 동안 비활성 상태일 때 Excel 파일 자동 저장 및 닫기

VBA 코드를 사용하여 특정 시간 동안 비활성 상태일 때 Excel 파일 자동 저장 및 닫기

특정 시간 동안 비활성 상태일 때 Excel 파일을 자동으로 저장하고 닫으려면 다음 단계를 따르세요.

1. 일정한 비활성 시간 후 자동 저장 및 닫기를 설정하려는 통합 문서를 엽니다. 그런 다음 Alt + F11 키를 동시에 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2. Microsoft Visual Basic for Applications 창에서 오른쪽 창의 ThisWorkbook을 두 번 클릭하여 코드 창을 엽니다. 그런 다음 아래 VBA 코드를 복사하여 코드 창에 붙여넣습니다. 스크린샷 보기:

VBA 코드 1: 특정 시간 동안 비활성 상태일 때 Excel 파일 자동 저장 및 닫기

Dim xTime As String
Dim xWB As Workbook

Private Sub Workbook_Open()
'Updated by Extendoffice 2019/1/20
    On Error Resume Next
    xTime = Application.InputBox("Please specify the idle time:", "KuTool For Excel", "00:00:20", , , , , 2)
    Set xWB = ActiveWorkbook
    If xTime = "" Then Exit Sub
    Reset
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    On Error Resume Next
    If xTime = "" Then Exit Sub
    Reset
End Sub

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    On Error Resume Next
    If xTime = "" Then Exit Sub
    Reset
End Sub

Sub Reset()
    Static xCloseTime
    If xCloseTime <> 0 Then
        ActiveWorkbook.Application.OnTime xCloseTime, "SaveWork1", , False
    End If
    xCloseTime = Now + TimeValue(xTime)
    ActiveWorkbook.Application.OnTime xCloseTime, "SaveWork1", , True
End Sub

3. 계속해서 Insert > 모듈을 클릭하고 아래 코드를 복사하여 모듈 창에 붙여넣습니다. 스크린샷 보기:

VBA 코드 2: 특정 시간 동안 비활성 상태일 때 Excel 파일 자동 저장 및 닫기

Sub SaveWork1()
'Updated by Extendoffice 2019/1/20
    Application.DisplayAlerts = False
    ActiveWorkbook.Save
    ActiveWorkbook.Close
    
    Application.DisplayAlerts = True
End Sub

4. Alt + Q 키를 동시에 눌러 Microsoft Visual Basic for Applications 창을 닫습니다.

5. 파일 > 다른 이름으로 저장 > 찾아보기 클릭합니다. 스크린샷 보기:

6. 다른 이름으로 저장 대화 상자에서 파일을 저장할 폴더를 선택하고, 파일 이름 상자에 필요한 이름을 입력하고, 저장 형식 드롭다운 목록에서 Excel 매크로 사용 통합 문서를 선택한 다음 마지막으로 저장 버튼을 클릭합니다. 스크린샷 보기:

이제부터 이 통합 문서를 열 때마다 Kutools for Excel 대화 상자가 나타납니다. 통합 문서를 저장하고 닫을 시간을 입력한 다음 확인 버튼을 클릭하세요.

그리고 지정된 비활성 시간 후에 통합 문서가 자동으로 저장되고 닫힙니다. 스크린샷 보기:

Kutools AI로 엑셀의 마법을 풀다

• 스마트 실행: 셀 작업 수행, 데이터 분석 및 차트 생성 - 간단한 명령어로 모든 것을 처리합니다.
• 사용자 정의 수식: 작업을 간소화하기 위한 맞춤형 수식을 생성합니다.
• VBA 코딩: 손쉽게 VBA 코드를 작성하고 실행합니다.
• 수식 해석: 복잡한 수식도 쉽게 이해할 수 있습니다.
• 텍스트 번역: 스프레드시트 내 언어 장벽을 허물어 보세요.

AI 기반 도구로 엑셀 활용 능력을 강화하세요. 지금 다운로드하여 그 어느 때보다 높은 효율성을 경험해 보세요!