タイトル : VB6参照設定 投稿日 : 2011/12/03(Sat) 17:20 投稿者 : あいあい
VB6の参照設定について教えてください。 VB6からEXCEL2003のワークシートメニューバーの制御をするため、 次のようなコードを書きました。 Dim objXlsApp As Excel.Application Dim objXlsBook As Excel.Workbook Set objXlsApp = New Excel.Application Set objXlsBook = objXlsApp.Workbooks.Open(C:\Documents and Settings\AA\_ デスクトップ\BB.xls) objXlsApp.CommandBars("Worksheet Menu Bar").Enabled = True これをコンパイルしてEXEを作成し、実行したところ正常に動作するPCもあるのですが、 特定のPCにて「objXlsApp.CommandBars・・・」でエラーが発生し、 エラーナンバーはErr.Number=-2147319779でした。 EXCEL2003のCommandBarsプロパティを操作するためのライブラリは 「Microsoft Office 11.0 Object Library」のようなのですが、 VB6の参照設定では、「Microsoft Office 11.0 Object Library」にチェックは 入れていません。 以前から「Microsoft Office 11.0 Object Library」の参照設定はせずに 「objXlsApp.CommandBars・・・」コマンドも動作していたのですが、 私がこのソフトを担当して別の部分を修正したら、「objXlsApp.CommandBars・・・」 で特定PCにてエラーがでるようになってしまったのです。 ちなみに正常に動作するPCにもエラーが起こるPCも XPでMicrosoft Office 11.0 Object Library である C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLL は存在します。 ・特定PCにてエラーが起こる原因としてどのようなことが考えられるでしょうか。 ・また、Microsoft Office 11.0 Object Libraryの参照は必要でしょうか。 ・「Microsoft Office 11.0 Object Library」を参照していなくても 動作するPCがあるのはなぜでしょうか。 長くなりましたが、どなたか助けてください。 どうぞよろしくお願いいたします。 |