IEを操作するソフトなんですが、IEを起動し、指定のURLへなら飛ばせます。
しかし、テキストボックス内のURLへ飛ばそうとするとコンパイルエラーが出ます。
いい方法ありませんでしょうか?
どんなコードでエラーになったの?
Private Sub Command1_Click()
Dim ob As Object
Set ob = CreateObject("InternetExplorer.application")
ob.navigate = Text1.Text
ob.Visible = True
Set ob = Nothing
End Sub
--------------------------------------------------
こんな感じにしたら対応してませんと・・・・。
> ob.navigate = Text1.Text
Navigateは『プロパティ』ではありません。『メソッド』です。
上記の行を、
ob.Navigate2 Text1.Text
のように記述して見てください。
おお。ホントだ。できました。ありがとうございます。
ツイート | ![]() |