ExcelからOutlook経由で現在のワークブックを送信するにはどうすればよいですか？
おそらく、あなたはいつもExcelワークブックでレポートを作成し、修正しています。それを終了した後、保存されたレポートをできるだけ早く部門マネージャーに送る必要があります。ExcelからOutlookを開かずに、特定の人へ現在の全体のワークブックを迅速に送信するにはどうすればよいでしょうか？
「保存して送信」コマンドを使用して、ExcelからOutlook経由で現在のワークブックを送信する
VBAコードを使用して、ExcelからOutlookに現在のワークブックを添付ファイルとして送信する
「保存して送信」コマンドを使用して、ExcelからOutlook経由で現在のワークブックを送信する
この「保存して送信」コマンドを使用すると、Outlook経由であなたの全ワークブックを添付ファイル、PDFファイル、XPSファイル、またはインターネットファックスとして迅速に送信できます。以下のように操作します：
1. 送信したいワークブックを開きます。
2. Excel 2010では、「 ファイル」>「保存して送信」>「電子メールで送信」をクリックしてください。スクリーンショットをご覧ください：
ヒント: Excel 2007を使用している場合は、「Officeボタン」>「送信」をクリックしてください。スクリーンショットをご覧ください：
Excel 2013では、「ファイル」>「 共有」>「メール」をクリックしてください。スクリーンショットをご覧ください：
3. 「電子メールで送信」セクションから送信したい形式を選択します。この場合、私は「添付ファイルとして送信」アイコンボタンをクリックします。スクリーンショットをご覧ください：
4. Outlookの編集ウィンドウが表示されます。「 To」と「Cc」のテキストボックスに受信者の名前を入力し、「件名」ボックスに件名を入力します。「紹介文」ボックスにもメッセージを入力できます。スクリーンショットをご覧ください：
注意：
1. この方法は、Outlookをメールプログラムとして使用している場合にのみ動作します。
2. ワークブックを送信した後、Outlookを開いてメールが正常に送信されたかどうか確認できます。
VBAコードを使用して、ExcelからOutlookに現在のワークブックを添付ファイルとして送信する
ここでは、以下のVBAコードを使用して、Excelから現在のワークブックを添付ファイルとして送信することもできます。次の手順に従ってください：
1. 送信したいワークブックを開きます。
2. ALT + F11キーを押しながら保持すると、Microsoft Visual Basic for Applicationsウィンドウが開きます。
3. 「挿入」>「モジュール」をクリックし、モジュールウィンドウに次のコードを貼り付けます。
VBAコード：Excelから現在のワークブックを添付ファイルとして送信する
Sub SendWorkBook()
'Update 20131209
Dim OutlookApp As Object
Dim OutlookMail As Object
Set OutlookApp = CreateObject("Outlook.Application")
Set OutlookMail = OutlookApp.CreateItem(0)
On Error Resume Next
With OutlookMail
.To = "skyyang@extendoffice.com"
.CC = ""
.BCC = ""
.Subject = "kte feature"
.Body = "Hello, please check and read this document, thank you."
.Attachments.Add Application.ActiveWorkbook.FullName
.Send
End With
Set OutlookMail = Nothing
Set OutlookApp = Nothing
End Sub
注意：上記のコードでは、以下の情報を必要に応じて変更できます。
- .to = "skyyang@extendoffice.com"
- .CC = ""
- .BCC = ""
- .Subject = "kte feature"
- .Body = "こんにちは、このドキュメントを確認して読んでください。ありがとうございます。"
4. そして、F5キーを押してこのコードを実行すると、プロンプトボックスがポップアップ表示されるので、「許可」をクリックすると、このワークブックが送信されます。
注意：
1. このコードは、Outlookをメールプログラムとして使用している場合にのみ利用可能です。
2. ワークブックを送信した後、Outlookを開いてメールが正常に送信されたかどうか確認できます。
関連記事：
ExcelからOutlook経由でワークシートのみを送信するにはどうすればよいですか？
ExcelからOutlook経由でセル範囲を送信/メールするにはどうすればよいですか？
最高のオフィス業務効率化ツール
| 🤖 | Kutools AI Aide：データ分析を革新します。主な機能：Intelligent Execution｜コード生成｜カスタム数式の作成｜データの分析とグラフの生成｜Kutools Functionsの呼び出し…… |
| 人気の機能：重複の検索・ハイライト・重複をマーキング｜空白行を削除｜データを失わずに列またはセルを統合｜丸める…… | |
| スーパーLOOKUP：複数条件でのVLookup｜複数値でのVLookup｜複数シートの検索｜ファジーマッチ…… | |
| 高度なドロップダウンリスト：ドロップダウンリストを素早く作成｜連動ドロップダウンリスト｜複数選択ドロップダウンリスト…… | |
| 列マネージャー：指定した数の列を追加 ｜列の移動 ｜非表示列の表示/非表示の切替｜ 範囲＆列の比較…… | |
| 注目の機能：グリッドフォーカス｜デザインビュー｜強化された数式バー｜ワークブック＆ワークシートの管理｜オートテキスト ライブラリ｜日付ピッカー｜データの統合 ｜セルの暗号化/復号化｜リストで電子メールを送信｜スーパーフィルター｜特殊フィルタ（太字/斜体/取り消し線などをフィルター）…… | |
| トップ15ツールセット：12 種類のテキストツール（テキストの追加、特定の文字を削除など）｜50種類以上のグラフ（ガントチャートなど）｜40種類以上の便利な数式（誕生日に基づいて年齢を計算するなど）｜19 種類の挿入ツール（QRコードの挿入、パスから画像の挿入など）｜12 種類の変換ツール（単語に変換する、通貨変換など）｜7種の統合＆分割ツール（高度な行のマージ、セルの分割など）｜… その他多数 |
Kutools for ExcelでExcelスキルを強化し、これまでにない効率を体感しましょう。 Kutools for Excelは300以上の高度な機能で生産性向上と保存時間を実現します。最も必要な機能はこちらをクリック...
Office TabでOfficeにタブインターフェースを追加し、作業をもっと簡単に
- Word、Excel、PowerPointでタブによる編集・閲覧を実現。
- 新しいウィンドウを開かず、同じウィンドウの新しいタブで複数のドキュメントを開いたり作成できます。
- 生産性が50%向上し、毎日のマウスクリック数を何百回も削減！
全てのKutoolsアドインを一つのインストーラーで
Kutools for Officeスイートは、Excel、Word、Outlook、PowerPoint用アドインとOffice Tab Proをまとめて提供。Officeアプリを横断して働くチームに最適です。
- オールインワンスイート — Excel、Word、Outlook、PowerPoint用アドインとOffice Tab Proが含まれます
- 1つのインストーラー・1つのライセンス —— 数分でセットアップ完了（MSI対応）
- 一括管理でより効率的 —— Officeアプリ間で快適な生産性を発揮
- 30日間フル機能お試し —— 登録やクレジットカード不要
- コストパフォーマンス最適 —— 個別購入よりお得