Excel 사용자 정의 닫 기 단추 구현 코드

이러한 요 구 를 만 났 습 니 다.엑셀 이 닫 혔 을 때 엑셀 자체 의 저장 창 을 사용 하지 않 고 사용자 정의 로 만 사용 합 니 다.
이것 은 첫 번 째 필요 합 니 다.닫 기 를 눌 렀 을 때 촉발 합 니 다.
둘째터치 후,그 창 을 팝 업 할 수 없습니다.
셋째:취소 후 프로그램 을 중지 할 수 있어 야 합 니 다.
이것 을 하기 위해 오랫동안 모색 한 끝 에 마침내 결합 을 통 해 해결 방법 을 찾 아 냈 다.
선행

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   If C_Msg.PostA("Com_Err023", , True, 1) = vbOK Then
 
     Dim xxx As String
     xxx = "Yes"
    Cancel = False
   Else
     Dim sss As String
      sss = "No"
      Cancel = True
   End If
End Sub
더욱 집행 한다

Sub Auto_Close()
 
    ThisWorkbook.Saved = True
    If Application.Workbooks.Count = 1 Then
      Application.Quit
    End If
    'ThisWorkbook.Close False
End Sub
이상 이 바로 본 고의 모든 내용 입 니 다.여러분 의 학습 에 도움 이 되 고 저 희 를 많이 응원 해 주 셨 으 면 좋 겠 습 니 다.

좋은 웹페이지 즐겨찾기