Impresion ultimos registros de una tabla

[RodoGra]

Estoy intentando imprimir de una tabla, solamente los registros a partir del número que seleccione hasta el último, mediante el código siguiente, donde NumeroPieza es el número correlativo y que he seleccionado en un cuadro de texto ("DesdeNroPieza"), y "último", el que corresponde siempre al final del fichero.
Private Sub DesdeNPieza_Click()
Dim strWhere As String
Dim ultimo As String
Me.Visible = False
ultimo = DMax("[NumeroPieza]", "Piezas") 'Campo numérico de la tabla PIEZAS
strWhere = "[DesdeNroPieza]>=" And "[ultimo]<="
DoCmd.OpenReport ReportName:="ActualizTema", View:=acPreview, WhereCondition:=strWhere
DoCmd.SelectObject acReport, "ActualizTema"
DoCmd.Close acForm, Me.Name
End Sub.
Me da el error "No coinciden los tipos".
Muchas gracias