Is it simply a lack of a space before the AND?

[vba]

rst.Filter = "COUNTERPARTYCODE >= " & Range("E4").Value & " AND " & _
"COUNTERPARTYCODE <=" & Range("E26").Value
[/vba]