filter by name in combobox

[Patriot2879]

Hi i have a userform1 which has a combobox1 where i highlight a list of names ready to send on an email, when selecting a name from the combobox i want it to 'on click' to automatically update the work issue sheet with the name selected in the combobox, can you help please? this is the code i have so far. thanks again for your time, i am fairly new to this still.

Sub FilterMini()
Dim Lastrow As Long
    With Range("Work Issue")
        Dim ans As String
        ans = Range("ComboBox1").Value
        .AutoFilter Field:=2, Criteria1:=ans, Operator:=xlFilterValues
    End With
End Sub

 

[Patriot2879]

I forgot to add the names i want it to match in combobox1 with the names in work issue is in Column B, hope this helps, thanks in advance.