『エクセルのマクロでのoffice365の操作』（OM）

質問させてください。


エクセルのマクロ機能を使って、メールを送信したいと考えています。
下記のコードでoutlookからメールを送信することは出来たのですが、
メールをoffice365にて使用しているパソコンではエラーとなってしまいます。

    Dim Recipien As String, Subje As String
    Dim body As String
   
    Recipien = メールアドレス
    Subje = タイトル
    ThisWorkbook.SendMail Recipients:=Recipien, Subject:=Subje

office365でのメール送信については、エクセルのマクロ機能での操作は不可能
なのでしょうか。

もし、可能であるならば、コードをお教え願えないでしょうか。
よろしくお願い致します



＜ 使用 Excel：Excel2010、使用 OS：Windows7 ＞