You need to enable JavaScript to run this app.
优惠活动
大模型
产品
解决方案
定价
更多

如何用VBA修改Access子窗体subfrmEquipmentDatasheet的AllowEdits属性?

解决Access子窗体编辑权限切换的VBA问题

你的错误核心是子窗体引用方式错误:子窗体是作为主窗体的控件嵌入的,不能直接通过Forms集合调用,必须通过主窗体的子窗体控件访问其内部的Form对象。

正确VBA代码(按钮在主窗体上时)

Private Sub UpdateRecords_Click()
    ' 访问主窗体上的子窗体控件,获取其内嵌窗体对象
    Me.subfrmEquipmentDatasheet.Form.AllowEdits = True
    ' 严格保留创建/删除记录禁用的需求
    Me.subfrmEquipmentDatasheet.Form.AllowAdditions = False
    Me.subfrmEquipmentDatasheet.Form.AllowDeletions = False
End Sub

关键说明

  • Me:代表按钮所在的主窗体(EquipmentListF),无需硬编码窗体名称,更灵活
  • subfrmEquipmentDatasheet:主窗体上的子窗体控件名称(注意区分子窗体本身的名称,以设计视图中属性表的「名称」为准)
  • .Form:子窗体控件的核心属性,用来获取嵌入的实际窗体对象,所有数据源权限设置都在这个对象上

额外注意事项

  • 若要恢复禁用编辑,只需将AllowEdits设为False
  • 确认子窗体的数据源(EquipList表/查询)本身未设置只读权限
  • 子窗体控件的「源对象」属性需正确指向目标子窗体

内容的提问来源于stack exchange,提问作者treohr

相关产品推荐
方舟 Agent Plan

超全模态模型 × Harness 升级,最新支持 Deepseek-V4.1-Flash、GLM-5.3 系列、Doubao-Seedream-5.0-pro、Kimi-K3 (部分), 限时 9.9 元起

最近更新时间:2026.07.10 20:05:03