リンククリックについて

Message#3 2015年1月27日(火)18時36分
From: sky

なかなか難しく。。。
引数ですか～。。。難しいですね。。。

VBAマスターのメッセージ(#2)への返事

> skyのメッセージ(#1)への返事
>
> > 度々お世話になります。
> > リンクをクリックさせる時、anchorにinnerTextで動作させますよね？
> > 多分、あまり使用する事はないかと思うのですが、下記の様に・・・
> > "vba-ie"をクリックさせるのではなく、セル「Range("A1")」の文字列を代入させる事は出来るのでしょうか？
>
> Range("A1")を代入というのは
>
> >
> > 　'「vba-ie」が入っているリンクをクリック
> > 　Call linkClick(objIE, "vba-ie")
> >
>
> の部分を変更して
>
> Call linkClick(objIE, Range("A1"))
>
> したいということですか？
>
> 以下のlinkClickを見ると
>
> http://www.vba-ie.net/code/linkclick.html
>
> Sub linkClick(objIE As InternetExplorer, _
> aTagStr As String, _
> Optional ieTarget As String = "_self")
>
> 　For Each objTag In objIE.document.getElementsByTagName("a")
>
> 　　If InStr(objTag.outerHTML, aTagStr) > 0 Then
>
> 　　　objTag.target = ieTarget
>
> 　　　objTag.Click
>
> 　　　Call ieCheck(objIE)
>
> 　　　Exit For
>
> 　　End If
>
> 　Next
>
> End Sub
>
> になっていて、引数ieTarget がString なんで文字列しか扱えないんでしょう。
>
> Range("A1")はオブジェクトなんで、RangeかObjectに変えればうまくいきそうな気がしますが、試していないので責任はもてません・・・
>
> もしくは引数を設定したlinkClickサブルーチンを使わないので処理の中に組み込めばデータ型をきにする必要はないかもですね。