如何解决 Microsoft Access 中的编译错误？

Question

我一直收到未定义用户定义类型的编译错误。

错误在"Public globalRibbon As IRibbonUI"

我在工具下添加了更多参考以尝试解决问题，但我仍然遇到编译错误

Option Compare Database
Option Explicit

Public globalRibbon As IRibbonUI


Public Sub onRibbonLoad(ByVal ribbon As IRibbonUI)
  Set globalRibbon = ribbon
End Sub

Public Sub RibOpenForm(control As IRibbonControl)
  DoCmd.OpenForm (control.Tag)
End Sub

Public Sub ControlEnabled(control As IRibbonControl, ByRef enabled)
    Select Case control.ID
        Case "Primary"
            If CurrentProject.AllForms("Primary").IsLoaded Then
               enabled = False
          Else
                enabled = True
          End If

        End Select

  End Sub

我希望能够设置自定义功能区控件，但它不起作用。

Answer 1

您的 VBA 环境中的 COM 引用似乎有问题。您可以尝试安装最新更新and/or修复Office。

Compilation Error user-defined type not defined

打开 VBA 编辑器并转到工具 |参考。
向下滚动直到看到以下条目：
- Microsoft Access X.0 对象库。
- Microsoft Office X.0 对象库。
如果有多个版本，请使用最新版本。

应选择两个条目。

如何解决 Microsoft Access 中的编译错误？

How do I resolve Compilation Error in Microsoft Access?

ms-access

vba

ribbon

compiler-errors