- 最新文章列表
专业电脑培训机构,为北京、上海、广州、深圳、长沙、武汉、福州、厦门等城市提供EXCEL培训、PPT培训、WORD培训、ACCESS培训、PROJECT培训、MCSE培训、MCITP培训、OFFICE培训等高级培训及相关技术服务。
某学员来邮件提问到,如何设置EXCEL,在用户关闭文件时,不出现系统保存文件的提示对话框,而是出现自己定义的对话框?
整理完成的代码如下:
Private SubWorkbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
If ActiveWorkbook.Saved = False Then
AA = MsgBox("是否保存" & ActiveWorkbook.Name &"?", vbYesNo, "这是自定义的对话框")
If AA = vbYes Then
ActiveWorkbook.Save
ActiveWorkbook.Close True
Application.Quit
Else
Application.EnableEvents = False
ActiveWorkbook.Close False
End If
End If
End Sub
后记:EXCEL功能本身已经很强大了,如果加上VBA进行自定义开发或使用高士达EXCEL云平台进行二次开发,将会是如虎添翼!
厦门高士达是一家微软认证培训机构,是专业的EXCEL培训、PPT培训、ACCESS培训、OFFICE培训、微软培训、微软考试及其他IT服务供应商 ©2014 厦门高士达微软高级技术教育中心 闽ICP备16016261号 技术支持:厦门高士达