Population a Combo Box ActiveX

I found that there are a couple of different ways to populate the combobox, here is one I found.

Dim arg As Variant, myArray As Variant
  myArray = Array("One", "Two", "Three")
  
  'Fill list items
  For Each arg In myArray 
    Me.ComboBox1.AddItem arg
  Next arg

the colour may be a little more tricky...............