タイトル : Re: VB6参照設定 投稿日 : 2011/12/04(Sun) 12:08 投稿者 : 花ちゃん
> 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) コードを投稿される場合は実際に使っているコードをコピペして投稿して下さい。 実際に使っているコードと違うコードを投稿されると正しい回答ができません。 又、詳しい開発環境や実行環境・使用しているExcelのバージョンも含めて書くように して下さい。 > > 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」にチェックは > 入れていません。 では、開発環境での参照設定はどのように設定されているのでしょうか? 参照設定をしていなければ、上記のような事前バインディングのコードでは、 コンパイルエラーが発生するかと思うのですが。 EXCEL2003 の機能を使いたいのであれば、実行環境にもEXCEL2003 がインストール されている必要があります。 事前バインディングのコードで開発されたのなら実行環境も同じ環境でないと 正しく動作しません。 実行時バインディングなら、開発環境での参照設定は必要ありませんが、Excel の バージョン 間で互換性の無いコードは使用できませんし、定数等自前で設定する必要が ありますので注意して下さい。 詳しくは、ここの Excel & Word 関係をご覧ください。 http://www.hanatyan.sakura.ne.jp/vbhlp/excelframe.htm |