Excel自界说封锁按钮实现代码

这篇文章主要先容了Excel自界说封锁按钮实现代码,文中通过示例代码先容的很是具体，对各人的进修可能事情具有必然的参考进修代价,需要的伴侣可以参考下

碰着过这样一个需求，是在excel封锁的时候，不要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

以上就是本文的全部内容，但愿对各人的进修有所辅佐，也但愿各人多多支持剧本之家。

您大概感乐趣的文章: