Excel - Error al Seleccionar

Private Sub cbrut_Change()

Application.ScreenUpdating = False
Sheets("Clientes").Activate
On Error Resume Next
Cells(cbrut.ListIndex + 2, 0).Select
txtnombre.Text = ActiveCell.Offset(0, 1)
txtapellido.Text = ActiveCell.Offset(0, 2)
txtdireccion.Text = ActiveCell.Offset(0, 3)
cbcomuna.Text = ActiveCell.Offset(0, 4)
txtreferencia.Text = ActiveCell.Offset(0, 5)
txtfnac.Text = ActiveCell.Offset(0, 6)
txttelcel.Text = ActiveCell.Offset(0, 7)
txtcontraseña.Text = ActiveCell.Offset(0, 8)
txtemail.Text = ActiveCell.Offset(0, 9)

End Sub


El Primer Error es que al seleccionar un numero de rut de mi combobox se me activa la hoja en la cual estan los datos del cliente la cual no quiero que ocurra.

El Segundo Error es que regreso a la hoja en la cual se encuentra mi formulario y los datos no corresponden al rut seleccionado.

Dato importante el formulario esta creado en la misma hoja de excel y no en visual vale decir que el codigo que puse es cuando el formulario lo tenia creado en visual nose si eso involucre en algo lo que hice fue copia y pegar desde ya muchas gracias