![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?8acaa2e)
エクセル VBA にて IE のボタンがクリックできません;
どなたか、ご存知の方がいましたら、ご教授のほど、よろしくお願いいたします。
ヤフオクの出品をエクセルVBAで作成していますが、ここから先に行けません;
ソースコードは↓
<tbody>
<tr>
<td align="center"><table cellpadding="2" cellspacing="2" style="margin-bottom:0;">
<tbody><tr>
<td><input id="auc_preview_back" onClick="Ya.submit(document.auction, 'http://pageinfo16.auctions.yahoo.co.jp/jp/show/u … type="button" value="修正する">
</td>
<td> </td>
<td><input id="btnEditConfirm" onClick="Ya.submit(document.auction, 'http://edit16.auctions.yahoo.co.jp/jp/config/sub … type="button" value="ガイドラインと以下の注意事項に同意して更新する"></td>
</tr>
</tbody></table></td>
</tr>
<tr>
<td align="center"><table width="700" cellspacing="0" cellpadding="4" border="0">
<tbody><tr>
この "修正する" ボタンと "ガイドラインと以下の注意事項に同意して更新する" ボタン
があるのですが、うまく押せません;
書いているコードは↓
For Each objINPUT In objIE.document.all.tags("td") 'Inputのタグを.allから抜く
If objINPUT.Value = "ガイドラインと以下の注意事項に同意して出品する" Then
'見つけたINPUTオブジェクト(ボタン)を.Clickクリックする
objINPUT.Click
'用が済んだので(見つかったので)ループを抜ける
Exit For
End If
Next
'ページの表示完了を待ちます。
While objIE.ReadyState <> 4 Or objIE.Busy = True '.ReadyState <> 4の間まわる。
DoEvents
Wend
For Each objINPUT In objIE.document.all.tags("input") 'Inputのタグを.allから抜く
If objINPUT.Value = "修正する" Then
'見つけたINPUTオブジェクト(ボタン)を.Clickクリックする
objINPUT.Click
'用が済んだので(見つかったので)ループを抜ける
Exit For
End If
Next
'ページの表示完了を待ちます。
While objIE.ReadyState <> 4 Or objIE.Busy = True '.ReadyState <> 4の間まわる。
DoEvents
Wend
ここで詰まってしまい、先に進めません
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- HTML・CSS テーブルタグのセルの幅の一部だけを指定 1 2023/03/12 12:02
- AJAX JavascriptからPHPへのAjax通信でnullが返ってくる 3 2022/08/03 22:00
- JavaScript 追加ボタンを押した際に ok ボタンを押した場合のみ入力値が追記されるようにしたいです 6 2022/05/29 09:57
- Visual Basic(VBA) Selenium.ChromeDriverの使い方について 7 2022/09/22 06:43
- JavaScript ①入力フォーム→②確認表示画面→③送信完了画面のコードを書いているのです、 入力フォームから受け取っ 2 2022/05/10 16:45
- JavaScript javascriptでテーブルに追加した項目のid追加してローカルストレージを操作したい 5 2023/01/01 15:52
- JavaScript EasyUIのSubGrid(jquery)におけるObjectに入れた連想配列について 1 2022/05/02 11:21
- JavaScript jQueryで同じクラス名のものを別物として扱いたい 1 2022/06/17 14:14
- JavaScript コードレビューをお願いします。 1 2022/07/16 05:38
- JavaScript javascriptで移動ボタンを押した際に遷移するボタンを追記したい 1 2022/11/29 03:02
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
jspでのArrayListの値の表示
-
tableの任意行にfocusをあてる
-
マウスオーバーで複数の画像を...
-
ハイパーリンクを別ウインドウ...
-
img sec = ""の取得に失敗したとき
-
jquery datatablesを使用 イン...
-
テーブルの項目の値取得
-
クリックされた罫表セルの行番...
-
JavaScriptで特定のtdタグにcla...
-
テーブルの変数について
-
Jquery on click 発火しない
-
jQuery.eachの使い方について教...
-
jqueryで<tr>の制御
-
【UWSC】HTML内のある部分を抽...
-
jqueryで表に連番No.を追加したい
-
特定<table>内の<td>の色を変える
-
テーブル内に表示されている数...
-
セルをドラッグで選択するときに、
-
HTML中のTABLEのデータを抽出す...
-
ブルダウン選択でページの表示...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ハイパーリンクを別ウインドウ...
-
プルダウンで選択すると、DBの...
-
一覧から選択した行の行番号を...
-
tableの任意行にfocusをあてる
-
特定<table>内の<td>の色を変える
-
JavaScriptで特定のtdタグにcla...
-
至急!GetElementById でtdの...
-
マウスをブラウザの外に出した...
-
【UWSC】HTML内のある部分を抽...
-
スクロールバーの表示位置を変...
-
クリックされた罫表セルの行番...
-
テーブルの変数について
-
動的なtableの値を取得したい
-
特定の文字列を挿入
-
テーブル内に表示されている数...
-
javascript クリックすると、あ...
-
テーブルの項目の値取得
-
javascriptで質問です。 displa...
-
Tablesorteを2行一組でソートする
-
\\u30ad\\u30fc\\u30dc・・・と...
おすすめ情報
For Each objINPUT In objIE.document.Forms(0).All
If objINPUT.Title = "修正する" Then
'見つけたINPUTオブジェクト(ボタン)を.Clickクリックする
objINPUT.Click
'用が済んだので(見つかったので)ループを抜ける
Exit For
End If
Next
'ページの表示完了を待ちます。
While objIE.ReadyState <> 4 Or objIE.Busy = True '.ReadyState <> 4の間まわる。
DoEvents
Wend
でもダメでした、、、。