Visual Basic - alguien ve el fallo?

porque no me deja ejecutar esto? os pongo el codigo, os digo el error q me da y la linea, vale? a ver si me podeis ayudar :)

Private Sub DataCombo1_Change()
'cada vez q se elija algo diferente en el combobox
If Adodc1.Recordset.RecordCount <> 0 Then
Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Find Apellidos '& "='" & DataCombo1.Text & "'"
(ES EN ESTA LINEA DONDE ME DA PROBLEMAS...ME DICE Q "LA APLICACION ESTA USANDO ARGUMENTOS INCORRECTOS, O ESTAN FUERA DEL INTERVALO PERMITIDO, O ENTRAN EN CONFLICTO CON OTROS."...PORQ? LOS APELLIDOS SON UN CAMPO DE UNA TABLA EN ACCESS 97 Y EN EL DATA COMBO ESTAN LOS APELLIDOS Q EL USUARIO ELIGE Y Q SE DEBERIAN ENCONTRAR EN LA BUSQUEDA)
If Adodc1.Recordset.EOF Then
'No esta ese registro
Existe = False
Else
'si esta el registro
Existe = True
End If
End If
End Sub

Muchas gracias por vuestra atencion, esperando cuestra contestacion... :)

-Guay-

Aunque utilizo poco el control Ado, a simple vista veo que no especificas el tipo de cursor, es decir como quieres que se abra la tabla y como explorarla.
Ejemplo:
Adodc1.commandType = adCmdText
Adodc1.RecordSource = " select * ...... where .........."
adodc1.CursorType = adOpenDynamic
Adodc1.Refresh

muchas graciaaaaaaaaaas! :):):):)
voy a porbarlo ahora mismo, luego te cuento :D
GRACIAAAAAAAAAAAAAAAAAS :D

Ya estoy de nuevo aqui... :( eso son malas noticias
El caso es q me da siempre el mismo error en esa linea, porq puede ser? he añadido tu nuevo codigo y funciona pero cuando pasa por esa linea...... PLOF! el programa me casca :'(
Estoy desesperao, no se q hacer!!!!!!!!! igual cojo y tiro el ordenador por la ventana!!!!!!!!! >:[...di q no solucionare muxo pero me dan ganas...... :'(
Q le pasa a esta linea??? -> Adodc1.Recordset.Find Apellidos & "='" & DataCombo1.Text & "'"
(siendo apellidos un campo de una tabla de access97 y el data combo el apellido q el elige en el programa :(

Muchas gracias por vuestra atencion

prueba esto

adodc1.recordset.find "Apellidos= ' " & datacombo1.text & "'"

creo que ya te va a funcionar , no te preocupes

la linea deberia de ser asi ...

adodc1.recordset.find "Apellidos =" & Datacombo1.text

Espero que te sirva

Muchas gracias, de verdad...por un momento lo consegui, salí para hacer una copia y ahora no funciona, el caso es q seguire investigando pero habeis sido de gran ayuda :) Ya no sabia q hacer, andaba desesperadito :S, jeje :D
Graciaaaaaaaaaaaaas a tod@ssssss por vuestra colaboracion :D

adodc1.recordset.Find "Apellidos = '" & datacombo1.text & "'" prueba con esto haber