vbaとseleniumを使ってヤマトビジネスメンバーズでのcsvダウンロードの自動化を行おうとしております。
出荷データを選択までは完成しているのですがiframeで開かれるダウンロードのページの取得がうまくいかないため
方法を教えていただけないでしょうか。
vba
1Sub csvDL() 2 3With browser 4 .Get "https://bmypage.kuronekoyamato.co.jp/" 'ログイン画面 5 Call login 6 Call wait("#issue_search > div > a") 7 .FindElementByCss("#issue_search > div > a").Click 8 .FindElementByCss("#Search").Click 9 Call wait("#issue_data_btn") 10 .FindElementByClass("allCheck").Click 11 .FindElementByCss("#issue_data_btn").Click 12 .SwitchToFrame ("fancybox-frame111111111111111") 'fancybox-frameの後に乱数があるためどう要素を書けばいいのかわからない 13 14 Call wait("#output_file") 15 .FindElementByCss("#output_file").Click 16 Call wait("body > div.ui-dialog.ui-widget.ui-widget-content.ui-corner-all.ui-front.font_setting.ui-draggable.ui-dialog-buttons > div.ui-dialog-buttonpane.ui-widget-content.ui-helper-clearfix > div > button > span") 17 .FindElementByCss("body > div.ui-dialog.ui-widget.ui-widget-content.ui-corner-all.ui-front.font_setting.ui-draggable.ui-dialog-buttons > div.ui-dialog-buttonpane.ui-widget-content.ui-helper-clearfix > div > button > span").Click 18 19 20End With 21 22MsgBox "印刷完了後OKを押してください" 23Set browser = Nothing 24End Sub
動作テストでは直でidを入力で動いたのですが
fancybox-frame以降に乱数が入るため
要素をどう宣言すればいいのかわかりません。
///試したこと///
vba
1.SwitchToFrame ("fancybox-frame") 2.SwitchToFrame ("fancybox-frame*") 3.SwitchToFrame ("fancybox-frame"&*)
曖昧な宣言が出来ないかためしましたが上記の3種はいずれもダメでした。
何か解決方法はありますでしょうか。よろしくお願いします。
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2021/10/12 14:44