エクセルVBA IE操作 ②基本的なコード

エクセルVBA　IE操作　①前書き の続きです。

エクセルVBA　で　IE　を操作（その４) 　では、ヤマト運輸のクロネコメンバーズを

攻略してみましたが、今回は

日本郵便のWebゆうパックプリントを攻略してみましょう。

新規のエクセルファイルを開いて、ボタンを配置

Sub ボタン1_Click()
Dim objIE As Object
'IEオブジェクトを作成します
Set objIE = CreateObject("InternetExplorer.Application")
'①指定したURLを表示します
objIE.Navigate "https://login.post.japanpost.jp/aew/page/portalVerify"
'②ページの読み込みが終わるまでココでグルグル回る
Do Until objIE.Busy = False
Application.Wait Now + 1 / 24 / 60 / 60 / 10
Loop
objIE.Visible = True

 objIE.Document.all.member_id.Value = "abcdefg@xxxx.ne.jp"
objIE.Document.all.member_auth_pwd.Value = "999999"
objIE.Document.Forms(0).Item(4).Click

Set objIE = Nothing
End Sub

のコードを張り付けてみて下さい。

ゆうパックプリントにログインする画面（日本郵便のWebゆうパックプリント）が開いて

ID（メールアドレス）とパスワードが入力されて

ログインのボタンをクリックします。

※もちろん、正しいIDでもありませんので、エラーが返事されます。

　実際に試したい方は、新規登録してみて下さい。

このコードの中身を少しづつ説明していきます。