質問: GETITEM(ieid, ITM_ACCTXT) if Pos("ダウンロードが完了", ALL_ITEM_LIST[n-1])>0 // CLKITEM(ieid, "フォルダーを開く", CLK_BTN) //不要(フォルダ開く) Exit endif Wend Fend
回答: UWSCは環境やタイミングの違いで動作が不安定になることがありますので、利用は必要最低限で考えたほうが無難です。 >保存、名前を付けて保存のボタンクリックの安定しない原因、およびその対策をお教え願います の回答にはなりませんが、「任意の名前、形式のExcelファイルを得る」ということであればこんな方法はいかがでしょうか? ※ダウンロードボタンを表示させるまでの手順は省略※ (1)ダイアログにalt-S(保存)で応答。 ※ここのみUWSCを使う(あるいはIEのハンドルが採れているならUWSCを使わずVBAからsend/postMessageでも可)。 (2)上記の結果CSVファイルはダウンロードフォルダに格納されるので、それをVBAで開き、任意のファイル形式、ファイル名で保存。 ※同じファイルを何回もダウンロードした場合はファイル名に追番が追加されるので注意。日付等により最新ファイルを判断する必要があります。