А Вы давно сжимали базу? Часто помогает.
Такая хрень иногда случается с запросами, использующими VB(A) функции. То рассказывает, что не находит NZ(), то жалуется на слишком сложное выражение, особенно на текстовых функциях типа Mid().
Любой сохраненный запрос при первом выполнении после изменения компилируется (т.е. создается оптимальный план его выполнения). Ваш запрос компилируется неправильно, и при повторном выполнении - глючит.
Возможно помогут сервиспаки, но наверняка эту проблему можно решить, если в процедре создавать SQL выражение и использовать его в DoCmd.RunSql, Exequte или OpenRecordset. Или так:

Set db = CurrentDB
Set qdf = db.QueryDefs("ИмяЗапроса")

'Вариант 1
Set rst = db.OpenRecordset(qdf.SQL)
'Вариант 2
qdf.SQL = qdf.SQL
Set rst = qdf.OpenRecordset

Если это запрос на изменение, то:
db.Exequte qdf.SQL
или
qdf.SQL = qdf.SQL
qdf.Exequte
Во всех случаях запрос компилируется перед каждым выполнением. Это хоть и медленнее, но проблема должна отпасть.