使用するパソコンの違いでメソッドのエラーが出ます。

質問

以下のようなVBAで、ボタンを押すと、指定したアドレスにファイルが添付されるようにしました。
大抵のパソコンからは送れるのですが、たまにエラーで
「実行時エラー'1004'
'send Mail メソッドは失敗しました。'_Workbook'オブジェクト」
と言うのがでて送れなかったと報告を受けます。
4行目が黄色くなっているそうなのですが、使用するパソコンの設定か何かで送れないことがあるのでしょうか？
それとも、そもそも根本的に違っているのでしょうか？
よろしくお願いします。

Sub SendMail()
Dim strAddress As String
strAddress = "ここは送付先のアドレス"
ActiveWorkbook.SendMail Recipients:=strAddress
Range("J1:K6,K11:K25").Select
Range("K11").Activate
Selection.ClearContents
End Sub

回答No.2

junkUser · ベストアンサー

＞どのパソコンからも送れるように設定することはできるのでしょうか？

SMTPサービス コンポーネントをインストールすれば可能ですが、インストールしない場合は、SMTPサーバを指定しないといけないので難しいのではないかと思います。

参考URL：

http://www.atmarkit.co.jp/fwin2k/win2ktips/428wshmail/wshmail.html

回答No.1

junkUser

おそらく Outlook を使用していないからではないでしょうか。

補足

ありがとうございます。
どうやらそのようです。
どのパソコンからも送れるように設定することはできるのでしょうか？