Visual Basic - URGENTE FECHAS

Me da problemas esta consulta de fechas qué es lo que pongo mal puesto que los identificadores seme marcan en rojo y no me deja hacer la consulta

Dim fecha1, fecha2 As Date

fecha2 = CDate("textfecha2.text")
fecha1 = CDate("Textfecha1.Text")
Datapartes.recorset("fecha") = fecha
If ("fecha" >= fecha1 and <= fecha2) Then
DataGridfecha.Show
Else
MsgBox ("No hay partes entre estas fechas")
End If
End Sub

"fecha" es el campo de la tabla Partes al que consulto ¿esta mal entre comillas?
ayudarme muchas gracias

Prueba con :

If ("fecha" >= fecha1 and "fecha" <= fecha2) Then

El problema que me surge con esta consulta de fechas
es que al coger el campo fecha que es donde guardo los registros no se por que no lo acepta, debo de poner mal la sintasix pero no se donde muchas gracias a el jose por ayudarme en el and

Private Sub Buscafechas_Click()

Dim fecha, fecha1, fecha2 As Date

fecha2 = CDate("textfecha2.text")
fecha1 = CDate("Textfecha1.Text")

Datapartes1.recorset("fecha") = fecha
'es aqui donde me da el problema como cojo el dato del campo fecha para compararle con los dos text que luego introduzco?

If ("fecha" >= fecha1 And "fecha" <= fecha2) Then
DataGridfecha.Show
Else
MsgBox ("No hay partes entre estas fechas")
End If
End Sub

Si lo que quieres es tener en la variable fecha el valor que tienes en el recordset lo tienes que poner al revés y quitar las comilla en el if, si lo que haces es actualizar el recordset con el valor de la variable fecha (en este ejemplo de código no la tienes establecida a nada) mira a ver si es por que te falta una d en la palabra recordset en Datapartes1.recorset("fecha") = fecha y en este caso en el if iría if (Datapartes1.Recordset("fecha") >= ....., espero que te sirva

tienes que poner el campo fecha, no solo fecha sino el nombre de la tabla un punto y el campo fecha.
suerte, a ver si asi funciona