フォームにWebBrowserを貼り、イベント処理の記述をテストしてみます。 まぁ、あまり難しく考えないで、オブジェクトをダブルクリック(笑) まずは、ここから始めてみてください(おぃおぃ) ※しつこく繰り返すと、ダブルクリック、まずはここから？？？ ------- Private Sub UserForm_Initialize() Me.WebBrowser1.GoHome End Sub Private Sub WebBrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean) Debug.Pri
