Excelでハイパーリンクのアドレスを隠すにはどうすればよいですか？ 

Excelでは、ハイパーリンクが含まれているセルにマウスを合わせると、すぐにハイパーリンクのアドレスが表示されます。しかし、特定の場合においては、次のような画面のようにハイパーリンクのアドレスを隠したり削除したい場合があります。この作業をできるだけ簡単に解決するにはどうすればよいでしょうか？

ハイパーリンクを編集してハイパーリンクのアドレスを隠す

VBAコードですべてのハイパーリンクアドレスを隠す

ハイパーリンクを編集してハイパーリンクのアドレスを隠す

実際には、次の手順でハイパーリンクを編集することで、ハイパーリンクのアドレスを隠したり削除することができます：

1. 隠したいハイパーリンクのセルを選択します。

b. 右クリックしてコンテキストメニューから「ハイパーリンクの編集」を選択します。以下のスクリーンショットをご覧ください：

3. 「ハイパーリンクの編集」ダイアログボックスで、「 ScreenTip」ボタンをクリックしてください。以下のスクリーンショットをご覧ください：

4. 表示された「 Set Hyperlink ScreenTip」ダイアログで、キーボードからスペース文字を1つScreenTipテキストフィールドに入力してください。以下のスクリーンショットをご覧ください：

5. その後、「OK」＞「OK」をクリックしてダイアログを閉じます。これで、カーソルをハイパーリンクのセルに置いたときに、ハイパーリンクのアドレスが隠されます。

注: シート内に複数のハイパーリンクアドレスがある場合、それらをすべて隠すには上記の方法を1つずつ適用する必要があります。

VBAコードですべてのハイパーリンクアドレスを隠す

シート内のすべてのハイパーリンクアドレスを削除する場合、上記の方法は面倒で時間がかかります。そこで、このタスクを解決するためにVBAコードについて説明します。

1. ALT + F11キーを同時に押すと、Microsoft Visual Basic for Applicationsウィンドウが開きます。

2. 「挿入」＞「モジュール」をクリックし、モジュールウィンドウに次のコードを貼り付けます。

VBAコード: すべてのハイパーリンクアドレスを隠す

Sub ClearHyperlinksTip()
'Update 20140923
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    If Rng.Hyperlinks.Count > 0 Then
        Rng.Hyperlinks(1).ScreenTip = " "
    End If
Next
End Sub

3. そしてF5キーを押してこのコードを実行すると、ハイパーリンクを含む範囲を選択するように促すボックスが表示されます。以下のスクリーンショットをご覧ください：

4. 「OK」をクリックすると、選択したすべてのハイパーリンクアドレスが一度にスクリーンチップから削除されます。

注: 上記の2つの方法を使用しても、ハイパーリンクアドレスがスクリーンチップに表示されなくなりますが、ハイパーリンク自体は正常に機能します。

関連記事：

Excelで1つのセルに複数のハイパーリンクを挿入するにはどうすればよいですか？

Excelでハイパーリンクが色を変えないようにするにはどうすればよいですか？

Excelで複数のハイパーリンクパスを一度に変更するにはどうすればよいですか？

Excelですべてまたは複数のハイパーリンクを削除/消去するにはどうすればよいですか？