Excel VBAでアクティブシートをメール送信したい

会社の本部事務です。各営業所からの報告業務において、決まったEXcelシート上で必要項目に入力し、そのシートをメール添付して簡単に送信することをしたいです。
mail.Attachments.Add「添付ファイルのパス」とすると、白紙の原本が添付されてしまいます。
どうしたら、画面に開いているアクティブシートを添付して送信できるでしょうか。ご教示ください。

No.1 回答者： hallo-2007 回答日時： 2017/07/04 20:53

>mail.Attachments.Add「添付ファイルのパス」とすると、白紙の原本が添付されてしまいます。

このコードを実行す前に、上書き保存していますか？
ActiveWorkbook.Save　を
mail.Attachments.Add「添付ファイルのパス」前に入れておく

この回答へのお礼

hallo-2007さま、
早速に有難うございました。
確かに出来ました！有難うございます。
が、保存したシートがファイルフォルダ内に残るころは避けたく、開いているシートをそのまま添付する、ことで出来ないものでしょうか。。
たびたびすみません、お分かりになればよろしくお願いします。

お礼日時：2017/07/05 21:33