回答編集履歴

2

こちらかがいいかも

2020/08/07 06:36

投稿

mako1972
mako1972

スコア383

test CHANGED
@@ -1,7 +1,3 @@
1
- 参考URLですとひとつの指定エクセルを開くサンプルを提示しているのに対して
2
-
3
-
4
-
5
1
  Do While buf <> ""
6
2
 
7
3
 

1

こちらかがいいかも

2020/08/07 06:36

投稿

mako1972
mako1972

スコア383

test CHANGED
@@ -2,16 +2,8 @@
2
2
 
3
3
 
4
4
 
5
- https://excel-ubara.com/excelvba5/EXCELVBA242.html
6
-
7
- strDir = ThisWorkbook.Path & "\test\"
5
+ Do While buf <> ""
8
6
 
9
7
 
10
8
 
11
- 質問者さんは、ワイルドカードで複数のエクセルファイルを指定しようしているので
12
-
13
- エラーとるよな気がしますが・・。
9
+ のbufってんだろう・・。
14
-
15
-
16
-
17
- ca = ExecuteExcel4Macro("'path[*テスト.xls*]テスト2シート'!R3C2")