Necesito ayuda nuevamente, llevo días tratando de resolver esto:

Private Sub Command2_Click()
If Combo1 = "Rut" Then
Adodc1.Recordset.Filter = "Rut = '" & Text1 & "'"
Set DataGrid1.DataSource = Adodc1.Recordset
Else
If Combo2 = "Comienza con" Then
Adodc1.Recordset.Filter = "Nombre LIKE '" & Text1 & "%'"
Set DataGrid1.DataSource = Adodc1.Recordset
End If
If Combo2 = "Contiene a" Then
Adodc1.Recordset.Filter = "Nombre LIKE '%" & Text1 & "%'"
End If
End If
End Sub

Los filtros en rojo me funcionan perfecto, quiero hacer lo mismo pero con el rut, el problema es que no me funciona "No se puede abrir el filtro", creo que es porque lo datos a buscar son números, he intentado darle formato, pero no me resulta.

Si alguien me pudiera ayudar, lo agradeceria.