vb2010でExcelをオープンできない？
vb2010から既存のExcelをオープンするプログラムを、色々なサイトのサンプルを参考にして作りました。開発環境（VisualStudio）および開発用マシンに実行モジュールをインストールして動かすと、問題なく動作します。しかし、別のマシン（WinXP,Win7：両方テスト）にインストールすると「オブジェクト参照がオブジェクトインスタンスに設定されていません」というエラーが発生します。エラー箇所は、下記のコーディングのファイルオープンのステートメントです。
別マシンでは、フォーム系の別プログラムは正常に動作しています。Windows Updateで、最新の.NetFrameworkはインストールしているつもりです。Excelを制御する何かのコンポーネントのようなものが足りないのか？などと、中途半端な知識しかなく、問題を解決できません。
有識者の方のサポートを是非お願いします。
ベストアンサー
-
パパトモ
Excelのバージョンが違うのが原因だと思います。
開発環境と実行環境のExcelのバージョンを合わせるか、ExcelObjectLibralyのバージョンを実行環境のExcelのバージョンに合わせれば直るのではないでしょうか。
その他の回答
-
rarachojiro
以下が実際のコーディング内容です。
Imports Excel = Microsoft.Office.Interop.Excel
Imports Microsoft.Office.Interop
Imports Microsoft.Office.Core
Imports System.Runtime.InteropServices
Public Class ExcelCtl
Public xlApp As New Excel.Application
Public xlBooks As Excel.Workbooks
Public xlBook As Excel.Workbook
Public xlSheets As Excel.Sheets
Public xlSheet As Excel.Worksheet
Public xlClose As Boolean
Public Function ExcelOpen(ByVal FilePath As String, ByVal SheetName As String)
''Excel のオープン処理用プロシージャ
On Error GoTo ErrHandler
Dim xlsstat(6) As Object
xlClose = False '起動中は、ユーザが Excel を閉じれないように
xlApp = New Excel.Application
'Excel の WorkbookBeforeClose イベントを取得
AddHandler xlApp.WorkbookBeforeClose, AddressOf xlApp_WorkbookBeforeClose
xlBooks = xlApp.Workbooks
'既存のファイルを開く場合
xlBook = xlBooks.Open(FilePath) <=== ●●● このステートメントでエラー発生 ●●●
xlSheets = xlBook.Worksheets
xlSheet = DirectCast(xlSheets(SheetName), Excel.Worksheet)
xlApp.Visible = False
xlsstat(1) = xlApp
xlsstat(2) = xlBooks
xlsstat(3) = xlBook
xlsstat(4) = xlSheets
xlsstat(5) = xlSheet
xlsstat(6) = xlClose
Return xlsstat
Exit Function
ErrHandler:
MsgBox(FilePath & ":" & SheetName)
End Function
End Class
-
ken3memo
>開発用マシンに実行モジュールをインストールして動かすと、問題なく動作します。
間違えました。すみません。
この質問へのコメント
質問の情報
- 登録日時
- 2012-09-11 17:01:28
- 終了日時
- 2012-09-14 09:22:12
- 回答条件
- 1人5回まで
この質問のカテゴリ
この質問に含まれるキーワード
人気の質問
-
キッズケータイのショートメールってあるじゃないですか。 あれって新しく誰かと番号交換(メッセージを送る…
匿名質問者
1
1
1
-
【はてなブックマークのタイトルを変更する方法が知りたい】 以前は、自分がブックマークした後、ブッ…
filinion
-
僕の親は苛立っています。 「俺はネットの天才なのに、なんで通報されたり、アカウント凍結されたりするん…匿名質問者1
-
マニラランウェイは、航空チケットがなくても、徒歩で通過できるのでしょうか、門番が入口と出口にいると聞…匿名質問者1
-
WrwrdのPixivの小説を探しています。 Emさんが教授の時の教え子が多く人脈が広いという話です。 説明が下手…匿名質問者