| |
▼VBA初心クマ娘 さん：
おはようございます。
>初心者なので、よろしくお願いします。
>マクロボタンで、メニューの編集の中の検索メニューを表示したいのです。
>入力待ちの状態で、VBAは、止まらないのでしようか?
>ツールバーに、ユーザー設定でボタンを設置するしか方法はないのでしょうか
>誰か助けて下さい。
組み込みダイアログを使用すると可能ですよ。
'========================================================
Sub main()
Application.Dialogs(xlDialogFormulaFind).Show
End Sub
尚、オプションも指定できます。
Helpには、
xlDialogFormulaFind text、in_num、at_num、by_num、dir_num、match_case、match_byte
とでています。
前に数値を入れて試した時の結果ですが、
' text : 検索文字列
' in_num : 対象 1-数式 2-値 3-コメント
' at_num : 1-完全一致検索 2-部分一致検索
' by_num : 検索方向 1-行 ２-列
' dir_num : 0を入れておく
' match_case : 大文字と小文字の区別 0-しない 1-する
' match_byte : 全角と半角の区別 0-しない 1-する
こんな結果でした（数字を入れてサンプリングした結果です）
使用例
Application.Dialogs(xlDialogFormulaFind).Show "bbb", 2, 2, 2, 0, 1, 1
漏れがあるかもしれませんが、確認して下さい。
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
