Excel:确定是否使用“保存”或“另存为”

Question

我正在使用下面链接中的加载项代码版本来检查我尝试保存的任何文件的文件名中是否有“Template”；但是，如果我单击“另存为”，我不希望出现消息框。有没有办法确定正在执行什么类型的保存？感谢您的帮助!

链接:http://www.excelforum.com/excel-prog...e-w-addin.html

我更新了部分类模块，如下:

 Private Sub xlApp_WorkbookBeforeSave(ByVal Wb As Workbook, ByVal SaveAsUI As Boolean, Cancel As Boolean) 
    Dim UserInput As String 
    If LCase(ActiveWorkbook.Name) Like "*template*" Then 
        UserInput = MsgBox("Are you sure you want to over-write the Template?", vbYesNo) 
        If UserInput <> vbYes Then 
            Cancel = True 
        End If 
    End If 
 End Sub 

Answer 1

如果代码的操作方式与 Excel 的 Workbook_BeforeSave 事件类似，则当用户执行以下操作时，SaveAsUI 的值将为 True另存为(即，如果正在调用“另存为”用户界面，因此包括第一次保存工作簿)，如果只是执行正常的保存，则为 False。