ＶＢＡでリンクを踏みたい

質問

とあるサイトにログインした後に、「このページを印刷する」というリンクをＶＢＡでクリックしたいのですが
ソースは

<div class="section sideinfo">
<a href="#" class="print" onClick="JavaScript:openPrintWindow('CG017_001', 'CG018'); return false;">このページを印刷する</a>
</div>

こうなっています。

ＶＢＡコードで

objIE.Document.all.Item("JavaScript:openPrintWindow('CG017_001', 'CG018')").Click

をすると、「オブジェクト変数または With ブロック変数が設定されていません。」になります。

For i = 0 To objIE.Document.Links.Length - 1
'Debug.Print objIE.Document.Links(i).innerHTML
If objIE.Document.Links(i).innerHTML = "このページを印刷する" Then
objIE.Document.Links(i).Click
Exit For
End If
Next i

これで踏むことはできるのですが、
ソースから文字を探してそれをＶＢＡコードにあてて踏むことはできないのでしょうか？

回答No.1

DOUGLAS_ · ベストアンサー

http://cpansearch.perl.org/src/PERFORB/Finance-Bank-JP-MUFG-0.06/t/Helper/Page.pm
に同じソースのページがあるのはあるのですが、キャッシュページのようで、肝心の「onClick」が機能しません。

＞ソースから文字を探してそれをＶＢＡコードにあてて
＞踏むことはできないのでしょうか？

　実際のページの html ソース（JavaScript部分）を見てみないと、何とも申せませんが、
objIE.Navigate "JavaScript:openPrintWindow('CG017_001', 'CG018');"
でイケませんでしょうか？

お礼

ありがとうございました。