Excelで複数の強調表示されたリンクをアクティブ化する方法

Microsoft Excelでは、ハイパーリンクで別のファイルまたはWebページを開くことができます。リンクをクリックするとアクティブになり、新しいウィンドウで宛先が開きます。複数のクライアントWebサイトへのリンクなど、シートに複数のリンクが含まれている場合は、通常、それぞれを個別にクリックしてすべてをアクティブ化する必要があります。すべてのリンクを含む範囲を強調表示した場合でも、Excelは一度に複数のリンクを開くことはありません。すべてのリンクをアクティブにするには、各セルからのリンクを順番に実行するマクロを記述します。

1

開発者リボンをクリックします。

2

リボンの[コード]タブから[マクロ]をクリックして、ExcelのVisualBasicエディターを開きます。エディターは、次のような空のモジュールを開きます。

サブmcrtd()

エンドサブ

3

ルーチン内に次のFor-Nextループを追加して、範囲内の各セルでコードを実行します。

For Each c In Worksheets( "Sheet1")。Range( "C9:D9")。Cells Next

4

強調表示されたセルと一致するように、コード行のセルアドレスを編集します。たとえば、列Dで強調表示された100個のセルをアクティブにする場合は、行を次のように変更します。

Worksheets( "Sheet1")。Range( "D1:D100")。Cellsの各cについて

5

For-Nextループ内に次の行を追加します。

i = i +

この行は、ループが繰り返されるたびに変数「i」を1ずつインクリメントします。

6

For-Nextループ内の前の行の後に次の行を追加します。

Selection.Hyperlinks(i).Follow NewWindow:= True

ループを繰り返すたびに、範囲内のリンクが開きます。「i」の値は、開くリンクを示します。

7

「F5」キーを押してマクロを実行します。