ファイルアップロード前のプルダウン選択ができない
昨日以降(0) ２日前以降(0) ３日前以降(0) ４日前以降(0) ５日前以降(0)
| Message#2 2016年1月29日(金)00時22分 From: VBAマスター | 返事 削除 変更 |
| 選択自体は問題ないように見えますね。 型宣言でエラーが起きているのかも知れませ。 Dim OBJBを削除してみたらどうですか？ > ネットのサンプルを参考に作成し、走らせると下記エラー個所でエラー９１が出ました。 > MsgBox OBJB.Valueで確認するときちんと目的のバリュー値（option value="aaa"）はキャッチできています。 > 今一歩なのですが、原因がわかりません。 > ご指導のほどよろしくお願いします。 > > Set OBJ = OBJIE.document.getElementsByName("bbb")(0) > Call setSelect(OBJ, "aaa") > > Sub setSelect(OBJ As Object, VS As String) > Dim OBJB > For Each OBJB In OBJ.tags("option") > Sleep 10 > If OBJB.Value = VS Then > 'MsgBox OBJB.Value > OBJB.Seleted = True'エラー個所 > Exit For > End If > Next > End Sub |
昨日以降 ２日前以降 ３日前以降 ４日前以降 ５日前以降
