¿Cómo puedo mostrar los datos obtenidos de una hoja de excel en un combo box de forma alfabética?

Ordena primaramente la lista y luego la agregas el ComboBox.

No la puedo ordenar amigo los datos se van obteniendo y no pueden estar alfabéticos por eso necesito alguna opción o alguna macro que me los ordene solo en el combox te agradecería alguna solución SI ayudame

Bueno pues siendo así:
1- Crear una función
Private Function CargaCombo(ByVal List As Variant, ByVal Dato As String)
For i = 0 To List.ListCount - 1
    If List.List(i) = Dato Then Exit Function
    If List.List(i) > Dato Then Exit For
Next
For i = 0 To List.ListCount - 1
    If List.List(i) > Dato Then Exit For
Next
List.AddItem Dato, i
End Function
2- Puedes insertar un botón e ingresar el siguiente código:
Private Sub CommandButton1_Click()
Dim Fila As Long, i As Long
ComboBox2.Clear
Fila = 3
Do While Len(Sheets(1).Cells(Fila, 1))
    CargaCombo ComboBox2, Sheets(1).Cells(Fila, 1).Value
    Fila = Fila + 1
Loop
End Sub
Hasta aquí te puedo ayudar, si quieres algo más utiliza tu imaginación.

Gracias amigo pero la verdad soy novato y casi no entiendo nada si se pero a que le programo eso al combobox a un botón o a los dos si podrías explicarme mejor Y te agradezco mucho eres buena honda se te agradece...

Lo puedes poner en el evento Activate del UserForm

Pero y con los combobox cuantos debo tener en el userform y cuantos command button
Y que nombre tienen que tener o el nombre por defecto

Esa pregunta es de primaria en programación. En el UserForm o el CommandButton tendrás los que quierras. Ya te dije utiliza tu imaginación.

La verdad te agradezco mucho amigo la ultima molestia no me podrías explicar cada macro que me describes algo así como
1- Crear una función
Private Function CargaCombo(ByVal List As Variant, ByVal Dato As String)
For i = 0 To List.ListCount - 1
    If List.List(i) = Dato Then Exit Function
    If List.List(i) > Dato Then Exit For
Next
For i = 0 To List.ListCount - 1
    If List.List(i) > Dato Then Exit For
Next
List.AddItem Dato, i
End Function
Algo así agrega esto a tal combo o a un combo y te servirá para tal cosa
Eso si se se puedo sino te califico como EXCELENTE, te haz portado bien amigo.
disculpa mi molestadera... gracias

Mejor me mandas tu archivo.
[email protected]
Nota: Este tipo de ayudas las hago Ad-Honoren, no recibo ni medio centavo por mis conocimientos. Muchas veces no cuento con el tiempo necesario porque tengo que atender mi empresa y clientes. Esto no lo hago por obtener una gran puntuación ni que crean que soy muy experto, lo hago porque me gusta ayudar a los que no saben o conocen muy poco. Gracias a Dios tengo buena puntuación, pero espero que comprendan que debo cumplir con mis prioridades.

Gracias mi correo es [email protected]  te agradezco mucho y te comprendo que dios te Bendiga Amigo. Si existieran muchas personas con tu pensar el mundo fuera diferente Gracias.