回答編集履歴
1
表現修正
answer
CHANGED
@@ -1,13 +1,13 @@
|
|
1
1
|
セル`A1`の値は単なる文字列のファイル名なのでオブジェクト変数ではなく文字列変数にしてください。
|
2
2
|
|
3
|
-
```
|
3
|
+
```VB
|
4
4
|
②①をオブジェクト変数に設定していています。
|
5
5
|
Set ファイル1 = ThisWorkbook.Worksheets("シート1").Range("A1").Value
|
6
6
|
```
|
7
7
|
|
8
8
|
↓
|
9
9
|
|
10
|
-
```
|
10
|
+
```VB
|
11
11
|
②①を文字列変数に設定していています。
|
12
12
|
Dim ファイル1 As String
|
13
13
|
ファイル1 = ThisWorkbook.Worksheets("シート1").Range("A1").Value
|