IEでダイアログが表示された状態でボタンを押す処理ができない

Question

VBA初心者です。VBAでIEとの連携処理をしようとして困っています。

ホームページでCSVダウンロードボタンを押すと、下記の様なダイアログが表示されます。
＜ダイアログ表示＞
xxxからyyyを開くか、または保存しますか？ ファイルを開く(O) 保存（S) ▼ キャンセル（C)

このダイアログで"ファイルを開く(o)"のボタンを押す処理をしたいのですが、ダイアログが表示された状態でのHTMLドキュメントの要素の読み方が分からないため、どう処理して良いか分かりません。
HTMLドキュメントの要素が読めたら、他と同様getElementsByTagName(tagName)で処理できるのではないかと思っています。
仕方なくSendKeyで処理しようとしましたが、Alt＋Oでも、単なるOでも、Ctrl+Oでも、Shift＋oのどれも駄目でした。
アドバイスよろしくお願いします。
###発生している問題・エラーメッセージ

エラーメッセージ

###該当のソースコード

ここにご自身が実行したソースコードを書いてください

###試したこと
課題に対してアプローチしたことを記載してください

###補足情報(言語/FW/ツール等のバージョンなど)
より詳細な情報

Answer 1

こんにちは

私も同じことで上手くいかず、
下記のUWSCを使用してボタンを押すことに落ち着きました。
http://www.uwsc.info/faq.html#N23

Comments

[VBA-IE]

時間が経過してしまいましたが、色々調べ最終的にアドバイスいただいたUWSCを使う方法で解決しました。ありがとうございました。

Answer 2

こんにちは。

最終目標はファイルを開きたいのでしょうか？
たぶんダイアログ操作は難しいように思います。
Win API使って云々すればできるかもしれませんけど・・・

視点を変えての代替案ですが
机上案ですのでやってみないとわからないですが

下記のIEのキャッシュ先（IE環境によって変わるかも？）にダウンロードされていると思うのでＶＢＡで
「C:\Users\admin\AppData\Local\Microsoft\Windows\INetCache\IE[キャッシュフォルダ名]」の最新時刻のスタンプを持つフォルダの欲しいファイル名を開けば良いように思いますがどうでしょうか？

Comments

[VBA-IE]

回答、提案ありがとうございます。
しかしながら、IEで問題のダイアログを表示したところで、指摘されたキャッシュを探してみましたが、見つかりません。キャッシュのタイムスタンプもその日付のものが見つかりません。
また、ダイアログを表示したあと、BackTabキーを21個送れば、”ファイルを開く(O)”まで行けることが分かったので、SendKeys "+{TAB}", Trueを21個入れてみたのですが無反応で、全くお手上げ状態です。
どうかアドバイスをお願いします。

[cutedog]

あら？でませんか。SendKeys にしてもちょっと実現的ではないですね。
VB６を思い出して、ちょっとググってみたのですが
EXCELにもWebBrowserコントロールなるものがあるようです。
これを使用することで実現できそうな感じですよ。ダイアログに関しても記事がチラホラでているようです。
この辺を調査してみると何か実現する手がかりが出てくるかもです。

例えば↓↓↓
https://oshiete.goo.ne.jp/qa/8566164.html

[cutedog]

ちがうかも。.NET系かなでした。。
http://hanatyan.sakura.ne.jp/patio/read.cgi?no=335