IE11用「クロネコヤマト荷物問合せ」VBA
  • (2015-03-23 19:30:43)
昔、Excel2003から「クロネコヤマト荷物問合せ」を操作するVBAを組んだ。つい最近、これが動作しなくなった。ヤマト運輸さんの「クロネコヤマト荷物問合せ」ページのコードが微妙に変更されたらしい。

そこでVBAを見直したが、何年も手を入れる必要がなかったため「どしてこんなところにこんなコードを書いているか?」とか「この一文は何をしているのか?」といった感じで、自分が作成したコードなのに全然思え出せない。

もともと人様のコードをコピペして集めたようなものだったから身につかない。

単に試行錯誤して変更した箇所:

※フォームナンバーが変更されたらしい
・Shell.Windows.Item(Shell.Windows.Count - 1).Document.forms(0)(FormNo + 3).Value _

・Shell.Windows.Item(Shell.Windows.Count - 1).Document.forms(0)(2).Click

・Shell.Windows.Item(Shell.Windows.Count - 1).Document.forms(0)(3).Click

※文字列「 1件目」が複数含まれるようになった?なお、「☆」はIE.Documentの意味。そのまま書くとなぜかこのブログがエラーする。
・For n = 80 To ☆.all.Length - 1
If IE.Document.all(n).InnerText = " 1件目" Then

※以前何のために書いたコードか思い出せない。とりあえずコメントアウトしないと動作しない
・'ElseIf IE.Document.all(m + 10).InnerText = "" Then
'Exit For






<< モバイルフレンドリー対策< | >win7 ファイルの共有方法が今ひとつわからない >>
search
layout
admin

[▲page top]