在MS Project VBA中禁用"另存为"按钮,可以通过以下步骤实现:
Private Sub Application_WindowActivate(ByVal Wn As Window)
CommandBars("Menu Bar").Controls("File").Controls("Save As...").Enabled = False
End Sub
这段VBA代码通过在应用程序的WindowActivate事件中禁用"另存为"按钮。每当激活一个窗口时,代码将自动执行,将"另存为"按钮设置为不可用状态。
请注意,这只是禁用了"另存为"按钮,用户仍然可以使用其他方法保存项目文件。如果需要完全禁用保存功能,可以使用其他方法,如设置文件为只读或使用密码保护等。
腾讯云相关产品和产品介绍链接地址:
领取专属 10元无门槛券
手把手带您无忧上云