Con la tua soluzione mi dice:

Data type mismatch in criteria expression.

Infatti non è compatibile. Non è una stringa