インターネット上の方法は非常に面倒ですが、どのようなエンコードとデコードを行うのですか？他は1行のコードで簡単に解決できますが、効率はlikeほど高くないと感じます。ここで、InStr(1,LCase(UE_Title),LCase('&Grekey&'),0)<>0同じ問題が発生した場合は、この方法で解決してみてください。
