Oi, sei que parece banal, mas nao consigo inserir o titulo na list de uma combobox

Question

Seguinte:

Uso o form no Excel "VB"

alimento a combobox através de um loop de com valores 

Porem preciso colocar o titulo nesta lista, podem me ajudar?

segue código

Me.cmb_estab.Clear
Me.cmb_estab.ColumnCount = 2
Me.cmb_estab.ColumnHeads = True

i = 2  

Do While Not IsEmpty(Sheets("AUX").Range("P" & i))
   Me.cmb_estab.AddItem

   Me.cmb_estab.List(y, 0) = Sheets("AUX").Range("P" & i)
   Me.cmb_estab.List(y, 1) = Sheets("AUX").Range("O" & i)
   i = i + 1
   y = y + 1
Loop

Muitoooo Grato