Outlookの予定表を登録するExcelVBAコード2（終日対応）へのコメント

okumasahito より

okumasahito — Sat, 31 Jan 2026 12:36:55 +0000

ねこへの返信。

コメントいただいていたのに通知が届かず、確認が遅くなりました。
すみません。
今私はOutlookを使う環境ではないため、新たにコードを作成して動作確認することができなくなってしまいました。
またOutlookを使う際にコードを検討してみます。

ねこ — Mon, 12 May 2025 07:40:55 +0000

はじめまして
とても勉強になります

予定の公開方法(予定あり、外出中など)、非公開設定方法、の2点も教えていただけますでしょうか？

自分なりに調べてみましたが分かりませんでした。

okumasahito — Wed, 08 Feb 2023 14:01:32 +0000

vba難しいへの返信。

ご連絡ありがとうございます。
すみません。
既定以外の予定表への登録方法は私にはわかりません。
ネット上の情報も規定の予定表に対する処理ばかりでよい方法が見つかりませんでした。
できたとしてもコードはかなり難しくなりそうですね。

vba難しい — Wed, 08 Feb 2023 11:56:21 +0000

ご説明ありがとうございました。
大変参考になります。
規定の予定表ではなく、自分で作成したサブの予定表に登録するにはどうしたら良いでしょうか。
規定の予定表を変えれば登録できるのですが、変えたくないので。
もし方法があれば教えていただけると非常に助かります。
よろしくお願い致します。

okumasahito — Thu, 24 Dec 2020 11:01:30 +0000

むらへの返信。コメントありがとうございます。相手の予定表にそのまま登録することはできませんが会議出席依頼という形で送ることは可能だと思います。手順は下記です。 ①J列に相手先のメールアドレスを追加する ②aItemに予定表アイテムを格納した後の行で下記を追加します。

’予定を会議に変更 If Cells(i, 10) <> "" Then aITEM.MeetingStatus = 1 ' olMeeting aITEM.Recipients.Add Cells(i, 10) End If

③保存して閉じるを送信するに変更

aITEM.Save aITEM.Close 0

を

aITEM.Send

に変更することで相手に会議出席依頼が届くようになると思います。

むら — Mon, 21 Dec 2020 02:38:54 +0000

お世話になります。
こちらを活用してみたいのですが、自分以外の人のスケジュールにも登録をすることは可能でしょうか。