メルカリ VBA 出品カテゴリのスクリプト

質問

https://www.mercari.com/jp/sell/
こちらのページをIE/VBA制御したいと考えております。

商品の詳細という欄にあるカテゴリのフォームは、
大カテゴリ(例: レディース)を入力すると、
スクリプトを読み込んで小カテゴリ(例: ワンピース)のフォームが出てくる仕組みになっています。

下記のように、フォームの要素を取得して、
フォームに　レディース　という文字列を出力することには成功したのですが、
新しいフォームの追加がされていません。

おそらくフォームに値を入れるだけでは、
スクリプトのトリガーを引いていないことが原因だと思うのですが、
どのようにすればスクリプトが動くか、または原因をどのように調べたら良いか、
ご教示頂けましたら幸いでございます。
何卒よろしくお願いいたします。

Sub test()

Dim objIE As InternetExplorer 'IEオブジェクトを準備

Set objIE = CreateObject("Internetexplorer.Application") '新しいIEオブジェクトを作成してセット

objIE.Visible = True 'IEを表示
objIE.navigate "https://www.mercari.com/jp/sell/" 'IEでURLを開く

Do While objIE.Busy = True Or objIE.readyState < READYSTATE_COMPLETE '読み込み待ち

DoEvents

Loop

Dim htmlDoc As HTMLDocument 'HTMLドキュメントオブジェクトを準備
Set htmlDoc = objIE.document 'objIEで読み込まれているHTMLドキュメントをセット

Dim elForm As IHTMLElement, elPlaceholder1, elPlaceholder2 As IHTMLElement 'IHTMLElementオブジェクトを準備

Set elPlaceholder1 = htmlDoc.getElementsByClassName("select-default")(0)
elPlaceholder1.selectedIndex = 1

End Sub

回答No.1

neve33609

こんにちは、回答ではありませんがご了承ください。
私もACCESSで同じようなシステムを作っていまして、今は若干断念しつつありますが、、、

ちなみに画像の登録の処理はクリアされていますでしょうか？