質問編集履歴

1 追記です

qopedoeqp

qopedoeqp score 3

2016/10/24 14:11  投稿

エクセルVBA   
Sub ie_test() 'IEテストする。
'IEの起動
Dim objIE As InternetExplorer
Dim htdoc As HTMLDocument
Dim link As HTMLAnchorElement
Dim htdoc_frame As HTMLDocument
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = True
'処理したいページを表示します。
objIE.navigate "https://mainmenu.rms.rakuten.co.jp/"
AppActivate objIE.Name
'ページの表示完了を待ちます。
While objIE.readyState <> 4 Or objIE.Busy = True '.ReadyState <> 4の間まわる。
DoEvents
Wend
Set htdoc = objIE.document
For Each link In objIE.document.Links
If link.href = "https://mainmenu.rms.rakuten.co.jp/rms" Then
link.Click
Exit Sub
End If
Next
Application.Wait [Now()+"00:00:05"]
objIE.document.all("login_id").Value = "jiki"
objIE.document.all("passwd").Value = "jiki"
End Sub
IE11を利用しています。
指定したURLをクリックさせるまでできたのですが
その次のIDとPASSが入力されません。。
さらに 次へ を押すコードもわかりません。。
どなたか教えて頂けると大変有難いです。。
よろしくお願い致します。
<追記>
リンクをクリックさせて
<リンク> をクリックさせて <IDとパスワード> を入力して <次へ> を
押して次ページへアクセスするまでの勉強させてください。
  • VBA

    2385 questions

    VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

思考するエンジニアのためのQ&Aサイト「teratail」について詳しく知る