I have three combo boxes on my file with following code on module1:

Public ConductList, UnitList, TeamList As Variant
       
Const InDebugMode As Boolean = False
Sub CreateComboboxLists()
        ConductList = Array("Barone, G.", "Barton, N.", "Batiato, B.", "Bennett, T.", "Bigham,S.", "Burkhart, M.", _
                           "Chiaravalloti, N.", "Cunningham, D.", "Damiano, G.", "DeSantis, L.", "Dietrich, S.", "Ferris, J.", "Firmin, P.", _
                           "Fisher, M.", "Fraga, F.", "Garcia, N.", "Gray, J.", "Irwin, K.", "Jordan, B.", "Kenny, T.", "Kirgan, K.", "Kressley, A.", _
                           "Larochelle, J.", "Ledoux, J.", "McCarthy, B.", "Medina, O.", "Miller, W.", "Patel, P.", _
                           "Pryor, C.", "Renn, T.", "Santos, M.", "Scott, A.", "Seigler, J.", "Sheridan, G.", "Ward, M.", "Wenk, R.", "West, S.")
                    
        UnitList = Array("Area1", "Area3", "Area4", "Area5", "CLEU", "DSU1", "DSU2-COB-WGS", "EastSide-MLR", "FCBW", _
                         "Hydrogen Plant", "PS-SDA", "PolyProp", "PFBW", "Process Units", "Utilities")
        TeamList = Array("A", "B", "C", "D")
        
End Sub
and following code on This Workbook:

Private Sub Workbook_Open()
        
       
ID.List = ConductList
Team.List = TeamList
Unit.List = UnitList
Call CreateComboboxLists
      
    
End Sub
When i open the file I get error message "run time error 424 - object required" and all of my conbo boxes remain blank - nothing come up on the drop down. Can you please help with this? I am going crazy.

Thank you so much!