Excel97 マクロで検索

質問

Excel97を使っています。

「マクロの記録」でセルの値を検索して記録し、そのまま「マクロの実行」で実行するとうまくいくのに、コマンドボタンから呼び出すと、「実行時エラー1004:RangeクラスのFindプロパティを取得できません」と出ます。ヘルプにもないようで困っています。

どのようにしたらよいのでしょうか？

教えてください

回答No.1

papayuka · ベストアンサー

ソースコードを提示された方が話しが早いです。

コマンドボタンがコントロールツールボックスのコマンドボタンなら、

ActiveCell.Activate

を先頭に入れてみるとか。

お礼

上手くいきました

ありがとうございました

補足

コレでした
Sub Macro4(sstr As String)
Cells.Find(What:=sstr, After:=ActiveCell, LookIn:=xlValues, LookAt:= _
xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
).Activate
End Sub