Con .find encontrar mas de un valor igual

Tengo un UserForm que tiene un textbox1, un combobox1 y un combobox2.

En la hoja2 de excel tengo una lista de productos con cantidades y en otra columna el numero de orden donde la mayoría son iguales.

Lo que necesito es que al ejecutar este código

Set busca = Worksheets("Hoja2").Range("F:F").Find(TextBox1.Value, LookIn:=xlValues, LookAt:=xlWhole)
If Not busca Is Nothing Then
ubica = busca.Address
ComboBox1 = Range(ubica).Offset(0, -5)
End If

Si existiera otro código igual debajo del que se encontró me pusiera el offset(0, -5) en el combobox 2 pero... Con el valor que esta debajo del primero que se encontró.