[[20160428180742]] 『組み込みダイアログ』(みっちゃん) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『組み込みダイアログ』(みっちゃん)

お世話になってます。
以前、正規表現や配列について とても詳しくわかりやすく教えてもらい、ありがとうございました。
あれから毎日、インターネットでいろいろなコードを見ながらコードを変えてみたりして、勉強している最中です。
よろしくお願いします。

大容量の処理対象データファイルがあります。
処理対象ファイルを開いたまま、
マクロ実行ファイル(別ファイル)からボタンを押して、処理をしたいウィンドウを選択する というものを見つけ、
お〜〜そんなことができるのか!と、早速、今までのコードにも取り入れて使っています。

「組み込みダイアログ」

     With Application.Dialogs(xlDialogActivate)
        If .Show <> True Then
             MsgBox "ファイルが選択されませんでした。": End
        End If
      End With

これで出たウィンドウを選択するのですが、
基になるデータファイルと、リストデータファイル2種類あるため、
 ”基になるファイルを選択してください。”とか、
 ”リストデータファイルを選択してください。”というメッセージを出したいのです。

『ウィンドウの選択』と書かれてある組み込みダイアログのタイトルは、変更できないのでしょうか?

今の私の浅い知識の中で思いつくのは、上のコードの前に

   Msgbox "基になるファイルを選択してください。"  これしか浮かびません。

他に方法があれば、教えて下さい。よろしくお願いします。

< 使用 Excel:Excel2007、使用 OS:Windows7 >


 たぶん・・・タイトルを変えることはできないと思います。
 xlDialogActivate には Show時、引数を2種類与えることができるようですが、タイトルとは別のものですので。

 選択するものに対するコメントを明示したいなら、開いたうえでの xlDialogActivate ではなく、
 普通の Application.GetOpenFilename にタイトル文字列を指定したものを使って、選択させて
 自分で開くほうが、より安定した操作になるような気がします。

(β) 2016/04/28(木) 19:52


βさん、ありがとうございます。
組み込みダイアログのタイトル変更は、無理だとわかってスッキリしました。
どこにも記されてなかったので・・・
言われた通り、Application.GetOpenFilename を使ってタイトルを指定するやり方にします。

ありがとうございました。また教えてください。

(みっちゃん) 2016/04/28(木) 21:02


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.