Apologies, that wasn't very helpful. I should have provided more detail.

Getting a 'Compile error: Ambiguous name detected: UserForm_initialize'

Dim myArray()   As String
    
    'Redefine list for reason for threat level
    'Select threat level
    'Create list of grades for threat
    myArray = Split("- Select -|High|Medium|Low", "|")
    'Use List method to populate listbox
    ComboBox2.List = myArray
    ComboBox2.ListIndex = 0
    'Use List method to populate listbox
    ComboBox3.List = myArray
    ComboBox3.ListIndex = 0
    'Use List method to populate listbox
    ComboBox4.List = myArray
    ComboBox4.ListIndex = 0
    'Use List method to populate listbox
    ComboBox5.List = myArray
    ComboBox5.ListIndex = 0
    
lbl_Exit:
    Exit Sub
End Sub