Os métodos na Internet são tão problemáticos, que tipo de codificação e decodificação?
Outros podem ser facilmente resolvidos com uma linha de código, mas sinto que a eficiência não é tão alta quanto gostaria.
onde InStr(1,LCase(UE_Title),LCase('&Grekey&'),0)<>0
Se você também encontrar o mesmo problema, tente resolvê-lo desta forma.