回答編集履歴
1
修正(元と先を取り違えていたのを修正)
test
CHANGED
@@ -1,12 +1,12 @@
|
|
1
|
-
こんな感じでどうでしょうか。
|
1
|
+
こんな感じでどうでしょうか。(修正しました)
|
2
2
|
|
3
3
|
```VBA
|
4
4
|
|
5
5
|
Dim moto As Worksheet, saki As Worksheet
|
6
6
|
|
7
|
-
Set moto = Workbook
|
7
|
+
Set moto = ThisWorkbook.Worksheets(1)
|
8
8
|
|
9
|
-
Set saki =
|
9
|
+
Set saki = Workbooks.Open("C:\Users\tkyks\Desktop\data.xlsx").Worksheets(1)
|
10
10
|
|
11
11
|
|
12
12
|
|