• ベストアンサー

VBによる複数バージョンのEXCELがインストールされているマシンでのオブジェクト起動について

マシンには EXCEL95とEXCEL2003がインストールされています GetObject("", "excel.Application") で起動するとEXCEL95で起動しようとしてしまいます EXCEL2003で起動するようにするには どのようにすればよいのでしょうか ご存知の方いらっしゃいましたら教えてください

  • be-be
  • お礼率70% (39/55)

質問者が選んだベストアンサー

  • ベストアンサー
  • kikaida-
  • ベストアンサー率69% (37/53)
回答No.1

参照設定でExcel２００３のライブラリを参照してください。具体的には参照設定のウインドウを開き、 ・現在設定されているExcelライブラリのチェックをはずす。 ・参照ボタンを押してExcel２００３のライブラリを指定する 　（C:\program files\microsoft office\office11\excel.tlb?かな) ・ｏｋをクリック

be-be
質問者

お礼

遅くなって申し訳ありません ありがとうございました

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (1)

  • taka_tetsu
  • ベストアンサー率65% (1020/1553)
回答No.2

GetObject("", "excel.Application.11")

be-be
質問者

お礼

遅くなって申し訳ありません ありがとうございました

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • AccessVBA 複数バージョンExcelが混在する環境で、任意のバージョンの起動したい

    いつもお世話になっております。 Access97 WinXPを使用しております。 当方開発環境にExcel97,2000,XPがインストールされております。 AccessVBA上にてCreateObjectする際に Set oXl = CreateObject("Excel.Application") 'excel起動 という風にActiveXオブジェクトとしてExcelを起動しているのですが、 この際、Excel2000が起動されます。 おそらく最後にインストールしたバージョンが2000（だったと思います） だからなのだと思うのですが、 上記のソースのまま、 起動するExcelのバージョンを任意に変更することはできないのでしょうか。 起動するアプリケーションのフルパスを指定することで起動はできるのだとは思うのですが 客先環境のExcelのインストール先ディレクトリと、 当方環境のExcelのインストール先ディレクトリが異なるため、 フルパスの指定以外で起動できないか、ご教示いただきたく、質問させていただきました。 何卒よろしくお願いいたします。

  • VBとExcelオブジェクト

    VB6から 起動してまたは→CreateObject ("Excel.Application") オープン中の→GetObject(, "Excel.Application") Excelのデータを取り込んでいるのですが エクセルのデータが一定以上の行を超えると エクセルがタスクに残ってしまいます。 過去ログなどを見ましたがいまいち原因がつかめません。 使っているのは、Rangeぐらいしかありません。 現状は、取込範囲が 44行でアウト 40行はＯＫといった感じです。 複雑なことはやっていませんが 取り込む行数によって現象が 起こったり起こらなかったりして 困っています。 ************************************ プログラム概要　GetObject版 Dim objExcel As Excel.Application Dim SheetNm As String Set objExcel = GetObject(, "Excel.Application") SheetNm = objExcel.ActiveSheet.Name Do Until 縦=終了条件 　　　Do Until 横=終了条件 　　　 　　　　　　構造体.XXX = objExcel.Range(座標).Value 　　　　　　横=横+1 　　　Loop 　　　縦=縦+1 Loop Set objExcel = Nothing 　　　. 　　　. 　　　. 格納した構造体のデータをデータベースに格納 　　　. 　　　. 　　　. ************************************ CreateObjectの場合は、 openやclose、Quitも記述してあります。

  • VBからEXCELを起動する

    VBよりExcelを起動するプログラムで困っています。 １．VBよりGetObject関数でTest.xlsを開く ２．Test.xls内のAuto_Openマクロでパラメータファイルをよみ、そこに指定されているエクセルファイルを新しいブックでを開く ということをしたいのですが(「マクロを有効にする」のダイアログは表示されてもかまわないです)、何故かTest.xlsが開いたと思ったらすぐ閉じてしまいます(Excel自体は終了してないですべてのワークシートが閉じた状態)。 Auto_Openマクロは走ってるようなのですが、ついでにCloseマクロも走ってしまいます。 ちなみにTest.xlsを単体で動かしたときは問題なく動くのです・・・。 以前はVB4＋Excel95の環境でAPI(CreateProcess)を使用し同作業を行っていたのですが、そのAPIが長いファイル名のスペース(OFFICEがある「Program File」のスペース)を認識しないそうで、この方法が使えないということでGetObjectを使用してみたのですが・・・。 何か根本的な間違いをしているのか、それともコードにエラーがあるのかさっぱりわからずお手上げです。 うまく疑問点を説明できているか不安なんですが、わかる方、どうかご指導願います。 よろしくお願いします。 ---------------------------------------- ＯＳは、Windows 2000 アプリケーションは、Excel 2000 です ----------------------------------------

  • VBscriptでEXCELを起動

    今、非常に悩んでいる問題があります。 VBscriptでEXCELを起動したいのですがうまく行きません。 (Web画面であるボタンを押下すると、Webサーバ上のEXCELが開くというものです) プログラム的には (1) Dim excel Set excel = GetObject("", "Excel.Application") excel.Visible = True excel.Workbooks.Open "http://ホスト名/フォルダ名/ファイル名.xls" Set WK_excel = Nothing (2) Dim excel Set excel = CreateObject("Excel.Application") excel.Visible = True excel.Workbooks.Open "http://ホスト名/フォルダ名/ファイル名.xls" Set WK_excel = Nothing の二通り(他いろいろ)を試したのですが、何もおきずに終了します。 同じことをVB6.0でするとうまく行くのですが・・・ はっきり言うとVBscriptに関して知識がなく 質問内容も説明が分かりにくいかもしれませんが よろしくお願いいたします。

  • VBからExcelに書き込む方法

    こんにちは。VB6.0(SP5),Excel2000,Win2000でVBの勉強をしています。 VBでコマンドボタンを押した時に、テキストボックスのデータを、Excelに書き込みたいと思っています。 特定のExcelに書き込むことは「GetObject」で出来たのですが、名前がわからない場合はどうしたらよいのでしょうか？ ※ExcelはVBから起動したものではなく、人が任意のファイルを起動しています。Excelの名前はわかっていません(任意なので、何かわかりません） このような場合に、VBから書き込むのは可能なのでしょうか？ よろしくお願いします。

  • EXCEL起動できません。

    　EXCELを起動しようとすると、すぐ「エラーが発生しました」と表示されて起動が出来ません。EXCEL単体で起動しても同様です。 　過去ログを参照し、セーフモードで立ち上げようとしましたが、同様で駄目でした。 　何度も再インストールしましたが、結果は同じです。 　ユーザー名を通常使っている名前（power user権限）からadministratorに変更してインストールすれば起動できますが、クライアントマシーンなのでadministratorの名前は使えません。 　どなたか原因で思い当たる方、どうか教えてください。

  • EXCEL97のバージョンについて

    Windows2000（SP2)上でEXCEL97を利用して帳表を出力するマクロを作成しました。 EXCEL97 SR-2がインストールされた複数のマシンでマクロを実行したところ 特定のマシンのみHPageBreaksのAddでアプリケーションエラーを起こします。 EXCELの「ヘルプ－バージョン情報」で表示させると全てSR-2と表示されますが 「システム情報－ソフトウェアの環境－実行中のタスク」のファイル日付がアプリ ケーションエラーを起こすマシンのみ1997/08/13になっており、他のマシンは 1997/09/23になっています。 SR-2が正しくあたっていないのかと思ったのですが、EXCEL97のバージョンを 細かく調べる方法がわかりません。 EXCEL97のバージョンを細かく調べる方法はありますか？

  • VBでエクセルのバージョンを指定して開く

    PCにEXCEL2002と2013がインストールされています。 VBでエクセルを起動し、マクロを実行したいのですが、その際に起動するエクセルのバージョンを指定したいと考えています。 以下でやると標準設定のEXCELが開いてしまい、バージョンの指定ができません。 Dim xlApp As New Excel.Application() Dim xlBooks As Excel.Workbooks xlBooks = xlApp.Workbooks xlBooks.Open("C:\test.xls") xlApp.Visible = True xlApp.Run("test.xls!macro") なにか方法はありますでしょうか？

  • VB6からのExcel起動について

    環境は WindowsXpSp3 Excel2002Sp3,Excel2003 VB6Sp6 です。 上記環境下で以下のコードの違いがよくわかりません。 Main1,Main2,Main3 で設定、処理方法（コーディング）、動作、終了（Excelオブジェクトの）の方法等で気をつけなければならないものが変わるのでしょうか。 もう一つ、 Set xlWorkbooks = xlApp.Workbooks についてですが、こちらは Set xlWorkbooks = new xlApp.Workbooks とするとエラーになります。 （Set xlApp = Excel.Application は New があってもなくてもエラーは出ません） この理由もわかりません。 インターネット上で色々検索はしてみたのですが、よくわかりませんでした。 ご存知の方、よろしくお願いいたします。 ------------------------------------------- Global xlApp As Excel.Application Global xlWorkbooks As Workbooks sub Main1() Set xlApp = Excel.Application Set xlWorkbooks = xlApp.Workbooks end sub sub Main2() Set xlApp = new Excel.Application Set xlWorkbooks = xlApp.Workbooks end sub sub Main3() set xlApp = CreateObject("Excel.Application") Set xlWorkbooks = xlApp.Workbooks end sub -------------------------------------------

  • Excelから、Word起動　マクロ

    ExcelからWord起動のマクロを以下のように記述しました。 (1)Wordを起動、Word閉じるメッセージが出る (2)2回目Wordを閉じて、タスクマネージャに無い状態でも、Word閉じるメッセージが出る 　　GetObjectの戻り値が、Nothingにならない。　原因は、何でしょうか？ Dim WdApp As Word.Application On Error Resume Next Set WdApp = GetObject(, "Word.Application") On Error GoTo 0 If WdApp Is Nothing Then Set WdApp = CreateObject("Word.Application") Else MsgBox "Wordを終了後に起動してください。", vbExclamation End If

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する