Outlook VBAで「ContactItem(コンタクトアイテム)」を使いこなす方法

パソコンパソコン・スマホ教室
スポンサーリンク

OutlookのVBAを使って、連絡先を自動で作成したり、管理したりする方法をご紹介します。特に、パソコンやスマホの操作に自信がない方でもわかりやすいように、ステップ・バイ・ステップで解説しますので、安心して進めてください。

スポンサーリンク

Outlook VBAとは?

Outlookのイメージ

Outlookのイメージ

Outlook VBA(Visual Basic for Applications)は、Outlookの動作を自動化したり、カスタマイズしたりするためのツールです。例えば、毎回手動で入力していた連絡先の情報を、自動で追加したり、更新したりすることができます。

ContactItem(コンタクトアイテム)とは?

ContactItemは、Outlookで「連絡先」を表すオブジェクトです。これを使うことで、名前や電話番号、メールアドレスなどの情報をプログラムから操作することができます。

ContactItemを使って連絡先を作成する方法

まずは、VBAを使って新しい連絡先を作成してみましょう。

  1. Outlookを開きます。
  2. Alt + F11キーを押して、VBAエディタを開きます。
  3. 「挿入」→「モジュール」を選択します。
  4. 以下のコードをコピーして貼り付けます。
Sub CreateContact()
Dim newContact As Outlook.ContactItem
Set newContact = Application.CreateItem(olContactItem)
newContact.FullName = "山田 太郎"
newContact.Email1Address = "taro.yamada@example.com"
newContact.BusinessTelephoneNumber = "03-1234-5678"
newContact.Save
End Sub
  1. F5キーを押して実行します。

これで、「山田 太郎」さんの連絡先がOutlookに追加されます。

連絡先の情報を編集する方法

既存の連絡先の情報を変更したい場合も、VBAを使うと便利です。

  1. 以下のコードをVBAエディタに追加します。
Sub EditContact()
Dim myNamespace As Outlook.NameSpace
Dim contactsFolder As Outlook.Folder
Dim contact As Outlook.ContactItem

Set myNamespace = Application.GetNamespace("MAPI")
Set contactsFolder = myNamespace.GetDefaultFolder(olFolderContacts)
Set contact = contactsFolder.Items("山田 太郎")

contact.Email1Address = "new.email@example.com"
contact.Save
End Sub

  1. F5キーを押して実行します。

これで、「山田 太郎」さんのメールアドレスが更新されます。

よくある質問や疑問

Q: VBAのコードを実行する際にエラーが出ました。どうすればいいですか?

エラーが出る場合は、コードの記述ミスやOutlookの設定が原因かもしれません。エラーメッセージを確認し、必要に応じて設定を見直してください。また、Outlookのセキュリティ設定でマクロが有効になっているかも確認してください。

Q: 作成した連絡先はどこに保存されますか?

作成した連絡先は、Outlookの「連絡先」フォルダーに保存されます。Outlookを開き、「連絡先」タブを選択すると、追加された連絡先が確認できます。

Q: 他の情報(住所や誕生日など)も追加できますか?

はい、可能です。ContactItemには多くのプロパティがあり、住所や誕生日なども設定できます。例えば、以下のように記述します。

newContact.Birthday = #6/15/1980#
newContact.HomeAddress = "東京都渋谷区1-2-3"

今すぐ解決したい!どうしたらいい?

LINE公式

いま、あなたを悩ませているITの問題を解決します!
「エラーメッセージ、フリーズ、接続不良…もうイライラしない!」

あなたはこんな経験はありませんか?

✅ ExcelやWordの使い方がわからない💦
✅ 仕事の締め切り直前にパソコンがフリーズ💦
✅ 家族との大切な写真が突然見られなくなった💦
✅ オンライン会議に参加できずに焦った💦
✅ スマホの重くて重要な連絡ができなかった💦

平均的な人は、こうしたパソコンやスマホ関連の問題で年間73時間(約9日分の働く時間!)を無駄にしています。あなたの大切な時間が今この悩んでいる瞬間も失われています。

LINEでメッセージを送れば即時解決!

すでに多くの方が私の公式LINEからお悩みを解決しています。

最新のAIを使った自動応答機能を活用していますので、24時間いつでも即返信いたします。

誰でも無料で使えますので、安心して使えます。

問題は先のばしにするほど深刻化します。

小さなエラーがデータ消失重大なシステム障害につながることも。解決できずに大切な機会を逃すリスクは、あなたが思う以上に高いのです。

あなたが今困っていて、すぐにでも解決したいのであれば下のボタンをクリックして、LINEからあなたのお困りごとを送って下さい。

相談しに行く

ぜひ、あなたの悩みを私に解決させてください。

まとめ

Outlook VBAを使うことで、連絡先の作成や編集を効率的に行うことができます。最初は難しく感じるかもしれませんが、少しずつ試していくことで、操作に慣れていきます。もし、わからないことや困ったことがあれば、お気軽にLINEからお声掛けください。

コメント

タイトルとURLをコピーしました