Access VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

1776 / 9994

←次へ　｜　前へ→


	【11506】Re:「ファイルを開く」ダイアログのモーダル設定について

yoco - 10/3/1(月) 13:33 -


	引用なし

	パスワード

▼小僧さん：
こんにちわ！
ご回答ありがとうございます。

>オブジェクト名.hWndOwner = Application.hWndAccessApp
>
>の様に、アプリケーションのウィンドウハンドルを渡してみて下さい。

ご丁寧にありがとうございます(*･ω･)*_ _)ﾍﾟｺﾘ

YU-TANGさんにご指摘いただいたように、実行コードを提示しておりませんで
ご迷惑おかけしています。

OPENFILENAME構造体の定義内容は↓の通りです。

Dim LTag As OPENFILENAME

With LTag
　　.lpstrTitle = "タイトル"
　　.lStructSize = Len(LTag)
　　.hwndOwner = Application.hWndAccessApp
　　.lpstrFile = String$(5120, Chr$(0))
　　.nMaxFile = 5120
　　.lpstrFilter = "圧縮(zip形式)ファイル (*.zip)" & vbNullChar & "*.zip"
　　.nFilterIndex = 1
　　.Flags = &H4
End With

hWndOwner = Application.hWndAccessApp と設定しているのですが
うまくいきませんでした。

YU-TANGさんに提示していただいたURLを参考に、自分なりに
もう少し調べてみます。

ありがとうございました★

1,345 hits

▼

【11487】「ファイルを開く」ダイアログのモーダル設定について yoco 10/2/26(金) 12:36