質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.35%
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Q&A

解決済

1回答

7068閲覧

ExecuteExcel4Macro が上手く使えない

ma2hiro

総合スコア159

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

0グッド

0クリップ

投稿2021/11/08 08:34

お世話になっております。
初心者の質問失礼いたします。

件名の通りなのですが
ExecuteExcel4Macro が上手く使えなくて困っております。
(ファイルの指定方法がおかしいのだと思います。)

ググって調べた
閉じたブックからデータを取得する:Excel VBA|即効テクニック|Excel VBAを学ぶならmoug
には

Target = "'" & Path & "[" & buf & "]Sheet1'!R1C1"

と記載があるので

vba

1 Dim wb As Workbook, fname, folderPath, Target As String 2 folderPath = ThisWorkbook.Path 3 Target = "'" & folderPath & "\定義excel\" & "[" & "01定義.xlsm" & "]Sheet1'!R1C1" 4 MsgBox ExecuteExcel4Macro(Target)

とやってみたのですが最終行のmsbBoxの所で

実行時エラー '13' 型が一致しません

と表示されてしまいます……

どうすれば
定義excel フォルダ の 01定義.xlsm の A1 が表示されるのか
どのような語句でググれば良いか博識な方はご助力頂けないでしょうか?

お忙しい所大変申し訳ないのですが上記お問い合わせいたします。

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

coco_bauer

2021/11/08 08:49

質問のプログラムのエラーが起きている行の上に、 Magbox Target というコードを挿入して、変数 Target の内容を確認してください。 型が一致しないというエラーが出ている原因は、Targetの内容によるものと思われますから。
ma2hiro

2021/11/09 00:12

coco_bauer様 コメントありがとうございます。 ``` Target = "'" & folderPath & "\定義excel" & "[" & "01コピー定義.xlsm" & "]Sheet1'!R1C1" Msgbox Target MsgBox ExecuteExcel4Macro(Target) ``` とした所 '\\192.168.1.111\gyoumu\作業フォルダ\自動化\定義excel[01定義.xlsm]Sheet1'!R1C1 と表示されました……                  ↑に \を入れた所解決しました。 ありがとうございました。
guest

回答1

0

自己解決

coco_bauer様のご助力により

Target = "'" & folderPath & "\定義excel" & "[" & "01定義.xlsm" & "]Sheet1'!R1C1" Msgbox Target MsgBox ExecuteExcel4Macro(Target)

とした所
'\192.168.1.111\gyoumu\作業フォルダ\自動化\定義excel[01定義.xlsm]Sheet1'!R1C1
と表示され                       ↑に
\が無いのが発覚したため \を入れた所解決しました。

ありがとうございました。

投稿2021/11/09 00:13

編集2021/11/12 00:23
ma2hiro

総合スコア159

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.35%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問