全て
| カテゴリ未分類
通常
| 数学
| 投資
| 副業
| 転職・就職
| ブログ
| 株Stock
| VBA
| SharePoint
| REST API
| RenderListDataAsStream
| PowerAutomateDesktop
| Graph API
| PowerApps
| PowerAutomate
| PowerFx
| OfficeScriptオフィススクリプト
| PowerAutomate日時Excel日時相互関係
| PowerShell
| Dataverse
| UiPath
| OneDrive
| LINQ
| VB.NET
| C#.NET
| WPFC#.NET
| Git
2024.01.10
カテゴリ： VBA
Sub SendEmailFromOutlook()
Dim OutlookApp As Object
Dim OutlookMail As Object
Set OutlookApp = CreateObject("Outlook.Application")
' 新しいメールアイテムを作成
Set OutlookMail = OutlookApp.CreateItem(0)
' メールの設定
With OutlookMail
' 件名を設定
.Subject = "メールの件名"
' 受信者のアドレスを設定
.To = "recipient@example.com"
' CCやBCCなど、必要に応じて他の受信者を設定
' .CC = "cc@example.com"
' .BCC = "bcc@example.com"
' メールの本文を設定
.Body = "メールの本文"
' 添付ファイルを追加する場合
' .Attachments.Add "C:\Path\To\Your\File.txt"
' メールを表示（Sendメソッドを呼び出す前にコメントアウトするか削除する）
'.Display
' メールを送信
.Send
End With
' オブジェクトを解放
Set OutlookMail = Nothing
Set OutlookApp = Nothing
End Sub
お気に入りの記事を「いいね！」で応援しよう
Last updated
2024.01.10 18:31:51
[VBA] カテゴリの最新記事
-
VBAでエラー発生時にリトライするコード 2024.02.22
-
ODBCでDataverseに接続する方法 2024.02.19
-
ExcelVBAでPowerPointの画像を張り付ける… 2024.02.10
【毎日開催】
15記事にいいね！で1ポイント
© Rakuten Group, Inc.
