VB初心者質問スレPart2

>>628
Private Sub CommandButton1_Click()
Cells.Find("あいうえお").Activate
End Sub

試験的にやってみた分ですが、これでもエラーが出ます（一応sheet1のセルに"あいうえお"と入れてあります）。
もうFindメソッド以外が間違ってるってことはないので、問題は絞れたはずなんですが・・・。
検索対象をRangeプロパティで指定してもだめでした。