Excel VBA Findメソッド奮闘中

シゴトで新しいExceVBAを書くことになり、他のExcelファイル内から指定した文字列を含むセルを全て選択状態にするマクロを作っているのですが…うまくいきませんorz
同一ブック内なら問題なく動く上、他のブック内の処理でも数字に関しては思ったとおりの動きをしてくれるのに、なぜか文字列に対してはFindメソッドが言うことを聞いてくれません。(´・ω・`)
コードは以下のとおり。
わかる人誰かたすけてクダサイ… orz

(さらに…)

07月21日のまりも占い (BlogPet)

まりもが占ってあげるね。

今日は「拒否運停滞中」だよ。
拒否することになるでしょう

なんかやーなヨカンが(´・ω・`)