Outlook VBAでメール内のハイパーリンクを取得する方法

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

皆さん、こんにちは。今日は、Outlookで受信したメールの中にあるハイパーリンクを、VBAを使って取得する方法をご紹介します。パソコンやスマホがちょっと苦手な方でも大丈夫です。ゆっくり丁寧に説明していきますね。

スポンサーリンク

はじめにVBAって何?

Outlookのイメージ

Outlookのイメージ

まず、VBAとは「Visual Basic for Applications」の略で、Microsoftのアプリケーションを自動化するためのプログラミング言語です。難しそうに聞こえるかもしれませんが、基本を押さえれば便利に使いこなせますよ。

Outlookのメールからハイパーリンクを取り出すには?

例えば、友人から届いたメールに複数のリンクが貼られているとします。そのリンク先を一つ一つ手でコピーするのは大変ですよね。そんな時、VBAを使えば一度にすべてのリンクを取り出すことができます。

具体的な手順

1. Outlookを開く普段使っているOutlookを起動します。
2. VBAエディタを開くキーボードの「Alt」キーを押しながら「F11」キーを押して、VBAエディタを表示します。
3. 新しいモジュールを作成上部メニューの「挿入」から「標準モジュール」を選びます。
4. コードを入力以下のコードをコピーして、先ほど作成したモジュールに貼り付けます。

vba
Sub ExtractHyperlinksFromMail()
Dim mail As MailItem
Dim hyperlink As Object
Dim links As String
On Error Resume Next
Set mail = Application.ActiveExplorer.Selection.Item(1)
If mail Is Nothing Then
MsgBox "メールが選択されていません。", vbExclamation
Exit Sub
End If
For Each hyperlink In mail.GetInspector.WordEditor.Hyperlinks
links = links & hyperlink.Address & vbCrLf
Next
If links = "" Then
MsgBox "ハイパーリンクが見つかりませんでした。", vbInformation
Else
MsgBox "以下のハイパーリンクが見つかりました" & vbCrLf & links, vbInformation
End If
End Sub

5. コードを実行コードを貼り付けたら、上部メニューの「実行」から「Sub/UserFormの実行」を選び、「ExtractHyperlinksFromMail」をダブルクリックします。

この手順で、選択したメール内のすべてのハイパーリンクを取得し、メッセージボックスで表示することができます。

よくある質問や疑問

Q1: コードを実行しても何も起こりません。どうすればいいですか?

まず、コードを実行する前に、取得したいハイパーリンクが含まれているメールを選択していることを確認してください。選択されていないと、コードは動作しません。

Q2: ハイパーリンクが表示されません。なぜでしょうか?

メールの形式がテキスト形式の場合、ハイパーリンクが正しく認識されないことがあります。HTML形式のメールであることを確認してください。

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

LINE公式

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

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

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

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

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

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

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

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

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

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

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

相談しに行く

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

まとめ

いかがでしたか?OutlookのVBAを使って、メール内のハイパーリンクを簡単に取得する方法をご紹介しました。最初は少し難しく感じるかもしれませんが、慣れてくるととても便利に使えます。ぜひ試してみてくださいね。他にも疑問やお悩み事があればお気軽にLINEからお声掛けください。

コメント

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