指定したハイパーリンクの件名行のテキスト文字列を設定または返します。 読み取り/書き込みが可能な String です。
構文
式。EmailSubject
式'Hyperlink' オブジェクトを表す変数。
注釈
件名がハイパーリンクのインターネット アドレスまたは URL に追加されます。 このプロパティは、通常、電子メールのハイパーリンクで使用されます。 このプロパティの値は、同じ Hyperlink オブジェクトの Address プロパティで指定されている電子メールの件名よりも優先されます。
例
この例では、作業中の文書で電子メールのハイパーリンクをチェックします。件名が空白のものが見つかった場合は、件名 "NewProducts" を追加します。
Dim hypLoop As Hyperlink
For Each hypLoop In ActiveDocument.Hyperlinks
If hypLoop.Address Like "mailto*" And _
hypLoop.Address = hypLoop.EmailSubject Then
hypLoop.EmailSubject = "NewProducts"
End If
Next hypLoop
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。