• ベストアンサー

excelvbaでファイルを開く時のダイヤログ

OS:WinXP-Home Office:Excel2000 を使用して、VBAの入力フォームを作成しています あるエクセルファイルから別のファイルのデータを参照するマクロを作っています ユーザが別のファイルを参照するために 「名前をつけて保存」する時に表示されるのと同じ 一般的なダイヤログを表示させる方法を以前とった事があるのですが その方法がすっかり分からなくなってしまいました ご存知の方がいらっしゃいましたらどうかよろしくお願いします (参考となるURLでも結構です)

質問者が選んだベストアンサー

  • ベストアンサー
  • kokorone
  • ベストアンサー率38% (417/1093)
回答No.1

以下のようなダイアログで、よろしいのでしょうか? http://www.feedsoft.net/excel/tips/vba_31.html http://www.officepro.jp/excelvba/book_new/index3.html

Bluejoy12
質問者

お礼

回答ありがとうございます 教えていただいた通りのものが欲しかったので非常に助かりました 本当にありがとうございました

その他の回答 (1)

  • Wendy02
  • ベストアンサー率57% (3570/6232)
回答No.2

こんにちは。 「名前をつけて保存」ダイアログは、 Application.Dialogs(xlDialogSaveAs).Show こういうスタイルになります。そして、必要に応じて、以下のように、引数を入れることにより、 Application.Dialogs(xlDialogSaveAs).Show , 6 3 .txt 6 .csv のように、拡張子を指定することが可能です。

Bluejoy12
質問者

お礼

回答ありがとうございます 直接Dialogsを使って操作する事も出来るのですね、この方法は知りませんでした 今後勉強させてもらいます、ありがとうございました

関連するQ&A

  • ExcelVBA ユーザーフォームのコードがない

    いつもお世話になっています。 Excel vbaで質問させてください。 あるExcelブック(test.xlsとします)を開くと、ユーザーフォーム(と思う)が表示されます。 (この時、Excelアプリケーションは「表示」されていてモーダルの状態です) ユーザーフォームで日付を選び、「これでOK」ボタンをクリックすると 新規ブックとして「text_0614.xls」が出来て、これが表示ブックとなります。 (元のtest.xlsは閉じられています) vbaコードの修正がしたくて、VBEから作業しようとしたところ ユーザーフォームモジュールも、標準モジュールも何も見当たりません。 Thisworkbookのイベントも何も書いてありません。 プロジェクトにパスワードがかかっているのかと思いましたが、もしそうだとしても プロジェクトウィンドウに、「フォーム」というフォルダは表示されると思いますし、 また、ダブルクリックしてもパスワードを求められることがありませんので パスワードがかかっているようには見えません。 これはExcelVBAのユーザーフォームじゃないのでしょうか?(VB?) または、もし、この「フォーム」フォルダごと、ユーザーに見せないやり方があるのでしょうか? どなたかご存知の方いらっしゃいましたらご教示ください! WinXP SP3 Excel2003 SP3 使用です。 どうぞよろしくお願いします。

  • ExcelVBA UserFormに沢山のボタンを貼り付けたい

    Excel2003のVBAを使っています。 コマンドボタンが沢山付いたユーザーフォームを起動したいのですが、 フォームに貼り付けるコマンドボタンの個数は、マクロを実行した時に決めたいです。 (例えば任意のセルの値を読み込むなどして) 要するにコードの中で、コマンドボタンの生成をしたいのですが、 可能でしょうか。 VBでプログラム組んでる知人に聞いたところ、「コントロール配列」なるものを利用すれば可能だそうですけど、 VBAにはそれが無いと聞きました。

  • ExcelVBAのコードが知りたい

    ちょっと古いことを教えてほしいのですが。 というのは、新しく知り合いになった方から、古いプログラム(Excel-VBA)を直したい、という相談を受けました。 ところが、ものすご~く古いものらしくて 1)VBAProjectを開いてみると、シートオブジェクトと標準モジュールはあるのですが、フォームが表示されません。     でも、実際の動きをみると、入力用のフォームなどは表示されます。 2)良く見ると(Sheet表示を全部見ると)、シートオブジェクトに表示されないものがあって、そこにX1DG,X2DG・・・という名前のダイアログシートがあって、そのシート上にフォームがありました。 3)Macroを動かすいわゆるボタンはなくて、リボンの中のアドインを選ぶと、”ユーザー設定のツールバー”が表示され、その中にプルダウンメニューが設定されていて、これを操作すると、それぞれの機能が動きます。 3)動作するVBAのコードは標準Module上に書かれていますが、上記のダイアログの中の定義体や、ユーザー設定のツールバーの中のコードがどこを探しても出てきません。 4)VBAの教科書などを見ると、どうもEXCEL95/Excel4.0の時代のもののように見受けられます。 5)今使用している(知り合いの方も、私も)ものは、WinVISTA・Excel2007なのです。 どうしたら、全体構成(VBA・DG)を見ることができるでしょうか? 教えていただけると、むちゃくちゃ嬉しいのですが。 宜しくお願いします。

  • ExcelVBA マクロエラー値の取り出し方

    Excel2002VBAを利用してcsvファイルを読込み、任意のシートへ貼り付ける処理を作成しています。 フォームのボタン押下により、マクロ記録で作成したシートへの貼りつけ処理を行う際、csvファイルが存在していないと、Err.Number=1004が発生してしまいます。 これをOnErrorでキャッチしてマクロの中でWk_ErrCode(フォームモジュールでPublicで定義)へセットし、フォームモジュールへ戻る処理を組んだのですが、戻り値が0になってしまい、後続処理を迂回出来ない様です。  出来れば、Err.Numberを利用したままエラー判定処理をフォームモジュールで行いたいのですが、良い方法は有りませんでしょうか。。。

  • Excel2000 → Excel2002でエラー

    Excel2000で作成したファイルがあります。それを、Excel2002で使用したいのですが、 ユーザーフォームにカレンダーコントロールを 設定している分が、エラーとなって表示されません。 その他のマクロ等に関してもエラーが出たので、 VBEの「ツール」-「参照設定」にて参照付加になっているもののチェックははずしました。 どのようにしたらよいでしょうか? よろしくお願いします。

  • VBAをExcel2010/2013で利用

    下記URLのサンプルファイルに含まれるVBAで作成されたユーザー定義関数について、 Excel2003(Windows7)の環境で利用することが出来ました。 http://www.relief.jp/itnote/archives/003799.php しかしながら、Excel2010およびExcel2013(ともにWindows7)で開くと、結果が #VALUE! と変わってしまい、正しく表示されませんでした。 VBAの参照設定でも同じものにチェックを入れている状態ですが、うまくいきません。 (ただし、Microsoft Excel XX.X Object LibraryやMicrosoft Office XX.X Object Library などバージョンの差異はあり) Excel2010またはExcel2013において、このユーザー定義関数を 正しく利用できる方法が分かりましたらご教示いただけますと助かります。

  • ExcelVBAでフォルダ内のファイルを読み込む

    お世話になります。 ExcelのVBAで、選択したフォルダ内全てのテキストファイル(.txt)を読み込んで、書き出しすることはできるでしょうか? 例えば、 01....05.txt→VBA→01_a...05_a.txt のような感じで、別ファイルで作りたいです。 動作環境はMacOsX、Excel2004forMacです。 Windowsでは動くVBAもMacでは動かなかったりするので、苦戦しています。 お願いします。

  • ExcelVBAのユーザーフォームの起動

    いつもすみません。 ExcelVBAで作成したユーザーフォームの画面をファイルを開いた直後に表示させることは可能でしょうか? ちなみに、ユーザーフォームが表示される前に、「マクロを有効にする」というボタンをクリックするぐらいのことはOKなのですが、、、 要は、ファイルを開いてからマクロの実行を手動で実行したくないということなのです。 (ボタンとか、ツールバーのメニューというのもダメなのです。) わがままなお願いですが、ご教授お願いします。

  • ExcelVBA 論理エラーについてお願いします

    単純な質問で申し訳ありません。 VBAのコード表示画面より、サブプロシージャの実行すると問題なく動作しますが、マクロボタン(自分で作成したオブジェクトにマクロ登録したものでユーザーフォームではない)から実行すると正しく動作しません。 標準モジュールに、2つのbookからセルを参照するプログラムを書いています。 コピーペーストして、Vlookup関数で照合です。 単純なミスでしょうか! 何度トライしても、ボタンからだと論理エラー(値を得られずに空欄)でVlookupが成功しません。 今はコード表示が書けませんが回答をいただくのに必要でしょうか? よろしくお願いします。

  • VBAでEXCELに埋め込んだPDFを開く方法

    あらかじめPDFファイルをシート内に貼り付けておき、 ユーザーフォーム上のボタンを押した時に、 PDFファイルを開くマクロを探しております。 参照パスを指定のフォルダにしなくても良い方法として あらかじめPDFファイルを貼り付ける事を考えました。 尚、使用しているexcelは2010です。

専門家に質問してみよう