Excel 在解锁工作簿中的工作表时,是否有方法显示错误/提醒消息?

Excel 在解锁工作簿中的工作表时,是否有方法显示错误/提醒消息?,excel,Excel,我正试图为一个基于excel的流程找到一个备份创建解决方案。 我想到的一个想法是锁定工作簿的工作表,并在解锁工作表时向用户显示提醒消息,以便用户在保存工作簿及其修改之前不会忘记将工作表打印成pdf。 解锁后自动打印pdf也是一种解决方案。 有没有办法做到这两个方面中的一个或两个? 谢谢。使用VBA,在本工作簿模块中插入以下代码: Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) If

我正试图为一个基于excel的流程找到一个备份创建解决方案。
我想到的一个想法是锁定工作簿的工作表,并在解锁工作表时向用户显示提醒消息,以便用户在保存工作簿及其修改之前不会忘记将工作表打印成pdf。
解锁后自动打印pdf也是一种解决方案。
有没有办法做到这两个方面中的一个或两个?

谢谢。

使用VBA,在
本工作簿
模块中插入以下代码:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    If Not SaveAsUI Then
        If Not Worksheets("Sheet1").Range("A2") = "Printed" Then
            MsgBox ("You haven't printed the book")
        End If
    End If
End Sub

代码:
如果不是工作表(“Sheet1”)。范围(“A2”)=“Printed”则
只是一个布尔值,您可以探索更多。

感谢您的回答。这是一个不同的方法,我的想法,但可能只是完美的。但是,我不清楚“Printed”值是如何进入(“Sheet1”).范围(“A2”)的,这样在每次保存之前消息框就不会一直出现。你能帮忙吗?谢谢。假设您有另一个打印文档的代码,打印后它将被打印在sheet1.A2中。