返信ありがとうございます。
ActivXのコントロールの仕方やファイルのヘッダの確認方法まで書いてくださり、
大変ためになりました。が、しかし、問題が生じました。

普通のAタグも新しいウィンドウ（_blank）で開いてしまうのですが、ご提示して頂いた
コードを見ると

    ' A タグの場合、target="_blank" の属性を指定する。  

    Dim element As Object

    Set element = pDisp.Document.activeElement

    If element.tagName = "A" And element.Target <> "_blank" Then

        element.Target = "_blank"

        WebBrowser1.PutProperty "targetAnchor", Array(element)

は”Aかつ_blankじゃなかったら_blankを指定する”になっている様な気がしますが、
いかがでしょうか？PutPropertyの値はURLをその様に書き換える様に見えますが・
この指定だと通常のウィンドウを開かないリンクも_blank指定になって新しいウィンドウが
開いてしまう事になってしまう様な気がします。前述に変わるコードを考えたいのですが、
1,2日待ってもらえないでしょうか？返信は必ずします。もしかしたら解決策が見つかって
この記事も削除されるかもしれません。

それでは失礼します。