En un formulario; cargue un combobox todos los gerentes y en otro todos lo cajeros

H o l a 

te paso la macro.

Private Sub UserForm_Initialize()
'//Por Aortiz
Set h1 = Sheets("Hoja1")
'
For i = 2 To h1.Range("A" & Rows.Count).End(xlUp).Row
ComboBox1.AddItem h1.Cells(i, "A")
ComboBox2.AddItem h1.Cells(i, "B")
Next i
'
End Sub

Valora la respuesta para finalizar saludos!

H   o l a:

Te anexo el código, para que lo pongas dentro de tu userform.

Cambia en el código "Datos" por el nombre de la hoja donde tienes tus datos

En el combobox1 te va a cargar los nombres de los "gerentes" y en el combobox2 los nombres de los cajeros.

Private Sub UserForm_Activate()
'---
'   Por.Dante Amor
'---
    Set h1 = Sheets("Datos")
    For i = 1 To h1.Range("A" & Rows.Count).End(xlUp).Row
        Select Case LCase(h1.Cells(i, "B"))
            Case "gerente"
                ComboBox1.AddItem h1.Cells(i, "A")
            Case "cajero"
                ComboBox2.AddItem h1.Cells(i, "A")
        End Select
    Next
End Sub

'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias