我正在创建一个Access表单,并希望禁用功能区和菜单,以便用户无法重新启用导航窗格,这将使他们能够访问删除/修改数据库记录。
禁用功能区菜单的一个问题是用户不再看到撤消/重做按钮。
似乎可以从UI中创建撤消按钮:设计->按钮(单击),然后选择“撤消记录”或通过编程方式使用“ Me.Undo”
但是,似乎没有一种方法可以重新创建“重做”按钮(没有“ Me.Redo”)。
是否可以重新创建重做按钮?还是启用功能区菜单是唯一的功能? (使用Microsoft Office 365 ProPlus)
答案 0 :(得分:2)
在按钮点击事件中添加以下内容
DoCmd.RunCommand acCmdRedo
您可能想要添加一些错误陷阱。
答案 1 :(得分:0)
我通常要做的是禁用整个功能区和导航窗格。您可以在文件->选项->当前数据库下执行此操作,现在取消选中显示导航窗格和允许完整菜单。或在启动表单的load事件中按代码进行编码:
'Maybe an If condition to check for admin
DoCmd.NavigateTo "acNavigationCategoryObjectType", "acNavigationGroupTables"
DoCmd.SelectObject acForm, vbNullString, True
DoCmd.RunCommand acCmdWindowHide
DoCmd.ShowToolbar "Ribbon", acToolbarNo