Do not use 'additem' to populate a combobox/listbox, but use 'List' instead.

Private Sub UserForm_Initialize()
  for j=2 to 5
    Me("combobox" & j).list=split("Late post|High volume|Work flow|Staffing issue|Support elsewhere","|")
  next
End Sub