質問編集履歴

2

誤記の修正

2020/06/12 07:56

投稿

koyamashinji
koyamashinji

スコア45

test CHANGED
File without changes
test CHANGED
@@ -1,6 +1,6 @@
1
- ■のように、IEオブジェクト作成時、
1
+ ■のように、IEオブジェクトやOutlookオブジェクト作成時、
2
2
 
3
- レイトバインディングした場合のみ、下記のエラーが出ます。
3
+ レイトバインディング(?)した場合のみ、下記のエラーが出ます。
4
4
 
5
5
 
6
6
 
@@ -39,3 +39,25 @@
39
39
  Set objIE = New InternetExplorerMedium
40
40
 
41
41
  ```
42
+
43
+ ###Outlookオブジェクトの作成時
44
+
45
+ ```
46
+
47
+ 'エラーが出る
48
+
49
+ Dim OLobj As Outlook.Application
50
+
51
+ Set OLobj = GetObject(, "Outlook.Application")
52
+
53
+ ```
54
+
55
+ ```
56
+
57
+ 'エラーが出ない
58
+
59
+ Dim OLobj As Outlook.Application
60
+
61
+ Set OLobj = New Outlook.Application
62
+
63
+ ```

1

誤記の修正。

2020/06/12 07:56

投稿

koyamashinji
koyamashinji

スコア45

test CHANGED
File without changes
test CHANGED
@@ -1,6 +1,6 @@
1
- ■のように、IEオブジェクトやOutlookオブジェクト作成の際
1
+ ■のように、IEオブジェクト作成
2
2
 
3
- レイトバインディング(?)した場合のみ、下記のエラーが出ます。
3
+ レイトバインディングした場合のみ、下記のエラーが出ます。
4
4
 
5
5
 
6
6
 
@@ -39,25 +39,3 @@
39
39
  Set objIE = New InternetExplorerMedium
40
40
 
41
41
  ```
42
-
43
- ###Outlookオブジェクトの作成時
44
-
45
- ```
46
-
47
- 'エラーが出る
48
-
49
- Dim OLobj As Outlook.aApplication
50
-
51
- Set OLobj = GetObject(, "Outlook.Application")
52
-
53
- ```
54
-
55
- ```
56
-
57
- 'エラーが出ない
58
-
59
- Dim OLobj As Outlook.Application
60
-
61
- Set OLobj = New Outlook.Application
62
-
63
- ```