• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:VB2005でのEXCELマクロ操作)

VB2005でのEXCELマクロ操作

このQ&Aのポイント
  • VB2005から指定したEXCELファイルを開き、標準モジュールにあるマクロを起動したいと考えています。
  • Runメソッドを使用するようですが、マクロファイルを開くところで停止してしまいます。
  • ソースコードを書いているのですが、アドバイスをいただきたいです。

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

  • ベストアンサー
  • n-jun
  • ベストアンサー率33% (959/2873)
回答No.2

#1です。 >Cドライブ直下に置きましたが、ファイルがみつからないというエラーが出てしまいました。 Cドライブに置いたのは単に私の方のテストです。 例えば C:\abc.xls に Sub try(st As String) MsgBox st End Sub と言うマクロがあったとします。 VB2005で Dim xlApp As Excel.Application = Nothing Dim xlWb As Excel.Workbook = Nothing Dim v As Object xlApp = New Excel.Application xlApp.Visible = True xlWb = xlApp.Workbooks.Open("C:\abc.xls") v = xlApp.Run(xlWb.Name & "!try", "今日も元気だね") とやるとExcel側のメッセージボックスで「今日も元気だね」と表示されます。 v = xlApp.Run(xlWb.Name & "!try", "今日も元気だね") の部分についてはExcelVBAのヘルプを見ました。

npupu
質問者

お礼

お礼が大変遅れてしまい申し訳ありませんでした。 >>Cドライブ直下に置きましたが、ファイルがみつからないというエラーが出てしまいました。 >Cドライブに置いたのは単に私の方のテストです。 私が勘違いしていたのですね。 教えていただいた方法で解決しました、どうもありがとうございます。

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

その他の回答 (1)

  • n-jun
  • ベストアンサー率33% (959/2873)
回答No.1

適当に作ったブックのマクロを動かす時、 ・ブック名をフルパスで指定するとダメ ・ブック名のみで指定すると実行出来た と言う感じでした。 C:\abc.xls で マクロ:try なら .Run("C:\abc.xls!try") ・・・× .Run("abc.xls!try") ・・・○ です。 今回の件に当てはまるかは自信ないですが。

npupu
質問者

お礼

Cドライブ直下に置きましたが、ファイルがみつからないというエラーが出てしまいました。 ありがとうございました。

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

専門家に質問してみよう