请教：用VBA如何实现打开指定的word文档时，屏蔽另存、打印按钮，关闭该文档后，打开其他word文档正常显示菜单。

[achan8021]

由于在办公自动化系统中，用户要求特定的文档需要控制权限。
我在word的Document_Open()事件中，写入如下代码，却无效
For dy = 1 To CommandBars("File").Controls.Count
If Instr(CommandBars("File").Controls(dy).Caption, "打印") > 0 Then
CommandBars("File").Controls(dy).Enabled = False
End If
If Instr(CommandBars("File").Controls(dy).Caption, "另存") > 0 Then
CommandBars("File").Controls(dy).Enabled = False
End If
Next


请高手指教，不胜感激！！

[vansoft]

技術支持：[e-mail]