回答編集履歴

1

追記

2019/09/01 08:29

投稿

meg_
meg_

score0

test CHANGED
@@ -1,33 +1,3 @@
1
- 【追記】下記コードで2.xlsxのsheet1のA1セルの値を取得できます。
2
-
3
- ```Python
4
-
5
- Sub test()
6
-
7
-
8
-
9
- Dim oApp As Object
10
-
11
-
12
-
13
- Set oApp = CreateObject("Excel.Application")
14
-
15
-
16
-
17
- With oApp.Workbooks.Open("C:\Users\Documents\2.xlsx")
18
-
19
- MsgBox .WorkSheets(1).Range("A1").Value
20
-
21
- End With
22
-
23
-
24
-
25
- End Sub
26
-
27
- ```
28
-
29
-
30
-
31
1
  エクセルでRangeとしているところを、アウトルックでは「oApp.Range」とすれば良いかと思います。
32
2
 
33
3
  ```vba