Compile Error: User-defined Type Not Defined on "Dim AppClass As ExcelEventClass" line in This Workbook code

[Engineer Joe]

The VBA in this workbook worked flawlessly and then one day I got this compile error upon opening. Code is shown below.

Option Explicit

Dim AppClass As ExcelEventClass

Private Sub Workbook_AddinInstall()
    
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Call DeleteToolbars
    
    Application.CommandBars("Cell").Reset
    
    On Error Resume Next
        Application.CommandBars(1).Controls("FPT").Delete
    On Error GoTo 0
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

If Application.UserName = "Joe Crowe" Then
    
    ThisWorkbook.Sheets("Z Dte").Range("A1").Value = Date + 365

End If

End Sub

Private Sub Workbook_Deactivate()
    
End Sub

Private Sub Workbook_Open()
Dim killdate As Date

Set AppClass = New ExcelEventClass

Call CreateControls

Application.DisplayAlerts = True

Run "Reassignshortcutkeys2"

End Sub

I have referenced Microsoft Excel 16.0 Library in references. Any ideas as to why this would have just popped up recently or more importanly how to fix it?

 

[rlv01]

It sounds like you lost the reference to whatever library the ExcelEventClass object is part of. Has your IT dept maybe pushed an office update recently?