GetOpenFileNameでのオプションの設定について

このQ&Aのポイント
  • AccessVBAでコモンダイアログを呼び出して、ファイル名を取得する方法とオプションの設定について解説します。
  • 存在するファイル名を指定した場合に上書きするかどうかを問い合わせるオプションを設定する方法について説明します。
  • ダイアログが表示されずに終了する場合の原因と対処法、さらにファイルが存在しなかった場合の問い合わせオプションの設定についても紹介します。
回答を見る
  • ベストアンサー

GetOpenFileNameでのオプションの設定について

AccessVBAでコモンダイアログを呼び出して、ファイル名を取得したいと思います。 このとき、存在するファイル名を指定した場合、上書きするかどうかを問い合わせるオプションを設定したいのですが、うまくいきません。 ダイアログが表示されて存在するファイル名を指定してもなにも表示されずに終わってしまいます。(もちろんファイル名はきちんと取得できています。)オプションのフラグには'&H2'をセットしています。 ちなみにファイルが存在しなかった場合に問い合わせるオプションの設定については意図したとおりに動作します。 ACCESS2003です。 どうすればよいか教えていただけるとありがたいです。 よろしくお願いいたします。

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

  • ベストアンサー
  • redfox63
  • ベストアンサー率71% (1325/1856)
回答No.1

WinAPIの GetOpenFileNameを保存用に使っているのであればそういった動作になるでしょう もともと GetOpenFileNameは読み込み用に使用するものです 保存用であれば GetSaveFileNameを使った方がいいでしょう GetOpenFileNameでは OFN_OVERWRITEPROMPT(&H2)は無視されると思います

hideto_urata
質問者

お礼

迅速なるご回答に感謝いたします。

関連するQ&A

  • Access2000のCommonDialogでファイル名を取得したい・・・

    Access2000でコモンダイアログBoxを使用してファイル名を取得 したいのですが、どうも上手く動きません! 取得方法を教えてください・・・ 通常だと↓でText形式の保存。ではFile名は? Dim strPath As String '指定ファイル名格納 'cdg = コモンダイアログ名 Me.cdg.Filter = "text|*.TXT"  Me.cdg.FileName = "C:\*.txt" 'コモンダイアログボックス表示 Me.cdg.ShowOpen strPath = "" & Me.cdg.FileName

  • フォルダ参照ダイアログボックス

    今、コモンダイアログボックスの使い方を学んだばかりの初心者です。 ファイル名の指定ではなく、フォルダまでのディレクトリを指定するのに、同じようにダイアログボックスを使ってやりたいと思っているのですが、どのようにしたら良いのでしょうか? コモンダイアログボックスですと、ファイルを指定しなければなりませんよね・・・ どなたか教えていただけませんか? よろしくお願いします。

  • ワード2010 オプション設定

    ワード2010を利用し作成中、Wordのオプション設定でダイアログボックスのチェックを外したり、付けたりした設定を≪この文書のみ≫の設定にするという事は、可能なのでしょか・・・。 Wordのオプション→表示→常に画面に表示する編集記号のダイアログボックスです。 次に、ワードを起動すると前回の設定状態なので、それを回避したいのですが・・・ よろしくお願いします。

  • VBAで、強制保存してブックを閉じるには?

    私の持っている書籍によると、 ActiveWorkbook.Close SaveChanges:=True これで、上書き保存してクローズしてくれると思っているのですが、 ファイル指定のダイアログが表示されて、ファイル名の指定を促されます。 もちろん、ファイル名はすでについています。 また、上書き保存を指定しているつもりなのに、保存ボタンを押すと 上書きするか?と聞いてきます。 ダイアログなど表示せずに、静かにクローズしてほしいのですが、 どうすれば良いのでしょう?

  • インターネットオプションについて

    こんばんわ。インターネットオプションの設定についてお聞きしたいのですが、インターネットオプションのダイアログを表示せずに「レベルのカスタマイズ」や「詳細設定」の設定を変える事はできますか?(どこかのファイルを書き換える・API関数など何でもいいです)宜しくお願い致します。

  • フォルダオプションの設定

    フォルダオプションで隠しフォルダとファイルの表示ができますが システム一括ではなく“指定したドライブ”のみに適応する方法はありますか? たとえばDドライブのみに設定して、ほかのドライブは非表示のままとかです。

  • コモンダイアログの設定

    コモンダイアログを表示させると「読み取り専用ファイルとして開く」というチェックボックスがダイアログの下のほうに出ていますが、このチェックボックスを表示させないようにするにはどうすればいいのでしょうか? コモンダイアログはGetOpenFileName関数で表示させています。 また、APIを利用する上で参考になるサイトをご存知でしたら教えてください。

  • コモンダイアログを表示したい

    Windows98/VisualBasic5.0を使用しています。 ファイル名を指定させるために、コモンダイアログを表示したいのですが方法がわかりません。 コントロールを貼り付ければよいのでしょうか? 初歩的な質問で申し訳ありませんが、よろしくお願いします。

  • コモンダイアログを表示メニューが詳細になった状態で開きたい

    VB6で、コモンダイアログを表示したときのデフォルトの状態を、詳細表示モードにしたいのですが、どのようなオプションを指定してオープンすればよろしいのでしょうか。 教えてください。 よろしくお願いします。

  • コモンダイアログからExcelへ

    コモンダイアログから既存のExcelファイルを表示させたいのですが、わかりません。 コモンダイアログの「開く」を押すとフルパスが取得されるというのは理解できたのですが、実際にプログラムをどう書いていいのかわかりません。 ファイルのパスを使うとはどういうことでしょうか? またshell関数をどう使えばいいのでしょうか? 基本的な質問で申し訳ありませんが、よろしくお願いします。