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

Question

我不断遇到未定义的“编译错误”用户定义类型。

错误出现在“以IRibbonUI形式公开globalRibbon”

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

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引用似乎有问题。您可以尝试安装最新的更新和/或修复Office。

  

未定义编译错误用户定义类型

1. 打开VBA编辑器，然后转到工具|参考文献。

2. 向下滚动，直到看到以下条目：

   • Microsoft Access X.0对象库。
   • Microsoft Office X.0对象库。

3. 如果有多个版本，请使用最新版本。

应同时选择两个条目。