[ツール]メニューの[オプション]をクリックすると表示されるオプションダイアログボックスの[全般]タブに「Webオプション」ボタンがあります。
このボタンをクリックして表示されるWebオプションダイアログボックスでは、ハイパーリンクの色を設定することができます。
フォームにハイパーリンクを挿入した時、URLなどを何色で表示するかを設定するためのものです。
●表示されていないハイパーリンクの色を設定する●
下記は、SetOptionメソッドを使って、黄色に設定しています。
Sub Sample()
Application.SetOption _
"Hyperlink Color", 11
End Sub
ハイパーリンクは、[挿入]メニューの[ハイパーリンク]で設定します。新規に作成されたフォームにハイパーリンクを挿入すると、黄色に表示されます。また、Webオプションダイアログボックスの[ハイパーリンクの色]ボックスは「黄色」が表示されます。
●表示済みのハイパーリンクの色を設定する●
下記は、SetOptionメソッドを使って、赤色に設定しています。
Sub Sample()
Application.SetOption _
"Followed Hyperlink Color", 9
End Sub
また、Webオプションダイアログボックスの[表示済みのハイパーリンクの色]ボックスは「赤色」が表示されます。設定できる色の値は次のとおりです。
0= 黒 1= 茶色 2= 緑 3= オリーブ 4= 濃い青
5= 紫 6= 青緑 7= 灰色 8= 銀色 9= 赤
10= 明るい緑 11= 黄 12= 青 13= 赤紫 14= 水色
15= 白