フォームにエクセルを表示する (ID:148022)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

[環境]
visual studio 2008
Office 2010

[質問]
上記環境にて、vb.netにてフォームにエクセルを表示させようとしております。

http://support.microsoft.com/kb/304643/ja
↑
こちらのサイトを参考にして処理を記述しておりますが、
表示しようとすると
フォームには、「Webページへのナビゲーションは取り消されました」と表示され
普通にエクセルが起動しファイルを開いてしまいます。
何が悪いのかわからず困っています。ご助言宜しくお願い致します。

[コード]
ほぼサポートサイトのコードと同じですが以下の処理にて上記現象になります。
  ※フォームには、Microsoft Web Browserとボタンを追加しています。

Public Class Form1
    Private oDocument As Object

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim strFileName As String = "デスクトップにあるエクセルファイルパス"
        oDocument = Nothing
        AxWebBrowser1.Navigate(strFileName)
    End Sub

Private Sub AxWebBrowser1_NavigateComplete2(ByVal sender As Object, ByVal e As AxSHDocVw.DWebBrowserEvents2_NavigateComplete2Event) _
                                               Handles AxWebBrowser1.NavigateComplete2
        On Error Resume Next
        oDocument = e.pDisp.Document
    End Sub

Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        oDocument = Nothing
    End Sub
End Class

←解決時は質問者本人がここをチェックしてください。

戻る