質問編集履歴
4
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -1,4 +1,5 @@
|
|
|
1
|
-
vbaでワードに反応してメールを送るvbaを作ったのです
|
|
1
|
+
vbaでワードに反応してメールを送るvbaを作ったのです
|
|
2
|
+
添付ファイルをつけれるようにしたいですが
|
|
2
3
|
下記にこれを追加したらできるでしょうか
|
|
3
4
|
すでに選択したファイルと同じファイルをおくります
|
|
4
5
|
mail.Attachments.Add file
|
3
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -1,11 +1,8 @@
|
|
|
1
1
|
vbaでワードに反応してメールを送るvbaを作ったのですが自由に添付ファイルをつけれるようにしたいですが
|
|
2
2
|
下記にこれを追加したらできるでしょうか
|
|
3
|
+
すでに選択したファイルと同じファイルをおくります
|
|
3
|
-
|
|
4
|
+
mail.Attachments.Add file
|
|
4
5
|
|
|
5
|
-
fname = Application.GetOpenFilename(フォルダ名")
|
|
6
|
-
mail.attachments.add=fname
|
|
7
|
-
でいいんでしょうか？
|
|
8
|
-
|
|
9
6
|
Sub ファイル自由参照()
|
|
10
7
|
Const olMailItem = 0
|
|
11
8
|
Dim file As String
|
2
title
CHANGED
|
@@ -1,1 +1,1 @@
|
|
|
1
|
-
|
|
1
|
+
vba 添付ファイルをつけてメールを送る方法について
|
body
CHANGED
|
File without changes
|
1
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -1,5 +1,11 @@
|
|
|
1
|
-
|
|
1
|
+
vbaでワードに反応してメールを送るvbaを作ったのですが自由に添付ファイルをつけれるようにしたいですが
|
|
2
|
+
下記にこれを追加したらできるでしょうか
|
|
3
|
+
Dim fname As String
|
|
4
|
+
|
|
5
|
+
fname = Application.GetOpenFilename(フォルダ名")
|
|
6
|
+
mail.attachments.add=fname
|
|
2
|
-
|
|
7
|
+
でいいんでしょうか？
|
|
8
|
+
|
|
3
9
|
Sub ファイル自由参照()
|
|
4
10
|
Const olMailItem = 0
|
|
5
11
|
Dim file As String
|