テーブル1のフィールド1をハイパーリンク型にし、
アドレスを「http://www.yahoo.co.jp/」と入力し、保存しました。
そのレコードをクリックすると、ヤフーのHPが開きます。
しかし、アドレスを「//www.yahoo.co.jp/」とした場合、
もちろんURLは開けません。
エラーメッセージが出たあとに
『「//www.yahoo.co.jp/」を開くことができません。
指定されたファイルを開くことができません。』
と再度エラーメッセージが表示されます。
このエラーが表示されるかどうかの結果をvbaで取得するのは可能でしょうか?
わざとエラーを発生させるために
Sub test()
Dim ObjIE As Object
Dim URL As String
Set ObjIE = CreateObject("InternetExplorer.Application")
URL = "http://www.co.jp/"’←ここの部分はあとでレコードの情報を読み取るコードを考えます。
ObjIE.Navigate (URL)
ObjIE.Visible = True
Set ObjIE = Nothing
End Sub
としてみましたが
IEが開き、「Inernet Explorer ではこのページは表示できません」
となりますが、、エラーページかどうかの情報はvbaでは取得できません。
この場合、どうすればいいのでしょうか?
ご教授よろしくお願い致します。
お礼
見てみます。ありがとうございます。