回答編集履歴

1

コード修正

2020/08/07 08:40

投稿

hatena19
hatena19

スコア33620

test CHANGED
@@ -28,7 +28,7 @@
28
28
 
29
29
  '開かずに処理
30
30
 
31
- ca = ExecuteExcel4Macro("'" & path & "[" & buf & "]Sheet1'!R1C1")
31
+ ca = ExecuteExcel4Macro("'" & path & "[" & buf & "]Sheet1'!R2C3")
32
32
 
33
33
  Debug.Print ca
34
34