人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

Excelについての質問です。

VBAで以下のようにマクロ設定して検索ダイアログを表示しました。
Sub 検索()
Application.Dialogs(xlDialogFormulaFind).Show
End Sub

しかし、シートに設置したフォームボタンにマクロを設定して、
検索ダイアログを呼び出したところ、正常に検索が行われません。

Excelのメニューの編集から選べる検索(呼び出したのと同じ物)では
正常に動作していたので、なぜマクロから呼び出したものではダメなのか
わかりません。

おそらく、検索するべきシートが正常に認識されていないのだと思います。
この場合、どうしたらよいのでしょうか?

試しに、Activesheet. とかも付けてみましたがダメでした。
メニュー項目は全て隠してしまう仕様にしたいのでどうしてもボタン
から呼び出す必要があります。

環境は、Excel2000です。

●質問者: nyankochan
●カテゴリ:コンピュータ
✍キーワード:application Excel sub VBA ダイアログ
○ 状態 :終了
└ 回答数 : 3/3件

▽最新の回答へ

1 ● RandD
●0ポイント

Sub EditFind()

Application.Dialogs(xlDialogFormulaFind).Show , 2, , 2

End Sub

こちらはいかがでしょうか

◎質問者からの返答

できませんでした、残念....


2 ● きゃづみぃ
●80ポイント

Cells.Select

を前に入れて 全セルを選択した状態にしてから検索するのは いいでしょうか?

Sub 検索()

Cells.Select

Application.Dialogs(xlDialogFormulaFind).Show

End Sub

◎質問者からの返答

全て選択状態でならできるのですね。

試しにRange("B4").Selectとしてみたら

これはダメみたいですね。

やはり、全選択させてその中を検索範囲にするしかないのでしょうか。

ただ、検索させる文字の場所が周りが反転しているので解り易くていいなと思わされました。

全選択以外での方法が出なければ、この方法を利用させていただきます。


3 ● kimoto-antena
●0ポイント

セルを指定していないので検索されないのでは。

次のようにすればいかが。

Sub 検索()

Cells.Select

Application.Dialogs(xlDialogFormulaFind).Show

End Sub

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ