Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


64952 / 76734 ←次へ | 前へ→

【16359】Re:マクロボタンでメニューの検索画面を表示
回答  ichinose  - 04/7/26(月) 8:33 -

引用なし
パスワード
   ▼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-行 2-列
' dir_num   : 0を入れておく
' match_case  : 大文字と小文字の区別 0-しない 1-する
' match_byte  : 全角と半角の区別   0-しない 1-する

こんな結果でした(数字を入れてサンプリングした結果です)

使用例

Application.Dialogs(xlDialogFormulaFind).Show "bbb", 2, 2, 2, 0, 1, 1

漏れがあるかもしれませんが、確認して下さい。
0 hits

【16357】マクロボタンでメニューの検索画面を表示 VBA初心クマ娘 04/7/26(月) 2:24 質問
【16359】Re:マクロボタンでメニューの検索画面を表示 ichinose 04/7/26(月) 8:33 回答

64952 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free