Excelでハイパーリンクを一括で有効化する方法とは？【初心者でもできる簡単手順】

Excelで大量のURLを一括でハイパーリンクに変換したいと思ったことはありませんか？例えば、A列にURLが並んでいる場合、それらを一つ一つ手動でリンク化するのは時間がかかりますよね。でも、安心してください。今回は、初心者の方でも簡単にできる方法をご紹介します。

なぜ一括でリンクを有効化する必要があるのか
初心者でもできる！HYPERLINK関数を使った一括設定方法
さらに便利に！VBAを使った一括設定方法
よくある質問や疑問
今すぐ解決したい！どうしたらいい？
まとめ

なぜ一括でリンクを有効化する必要があるのか

Excelのイメージ

例えば、以下のような状況を想像してみてください。

ここがポイント！

商品リストがA列に並んでおり、それぞれの商品の詳細ページのURLがB列に記載されている。
これらのURLを一つ一つ手動でリンク化するのは非常に手間がかかる。

このような場合、一括でハイパーリンクを設定することで、作業効率が大幅に向上します。

初心者でもできる！HYPERLINK関数を使った一括設定方法

初心者の方でも安心してできる方法が、Excelの「HYPERLINK関数」を使う方法です。

手順1URLを入力する

まず、A列にURLを入力します。例えば、セルに「(https://example.com)」と入力します

手順2HYPERLINK関数を使ってリンクを設定する

次に、B2セルに以下のように入力します。

=HYPERLINK(, "リンクテキスト")

これで、B2セルに「リンクテキスト」という文字が表示され、それをクリックするとセルのURLに飛ぶようになります。

手順3オートフィルで他のセルにも適用する

B2セルの右下にカーソルを合わせ、十字マークが表示されたら、下方向にドラッグします。これで、他のセルにも同様のリンクが設定されます。

さらに便利に！VBAを使った一括設定方法

もっと効率的に作業を進めたい方には、VBA（Visual Basic for Applications）を使った方法もあります。

手順1VBAエディタを開く

Excelの「開発」タブをクリックし、「Visual Basic」を選択します。

手順2新しいモジュールを挿入する

VBAエディタが開いたら、「挿入」メニューから「モジュール」を選択します。

手順3コードを入力する

以下のコードを新しいモジュールに入力します。

Sub CreateHyperlinks()

    Dim i As Long

    For i = 2 To 100 ' 2行目から100行目まで

        If Cells(i, 1).Value <> "" Then

            Cells(i, 2).Formula = "=HYPERLINK(""" & Cells(i, 1).Value & """, ""リンク"")"

        End If

    Next i

End Sub