業務で複数のExcelファイルを運用していると、「このセルから別のブックを開けるようにしたい」と思う場面が出てきます。
本記事では、VBAを用いて、セルに他のExcelブックへのハイパーリンクを自動で挿入する方法をご紹介いたします。
想定する用途と目的
- 他のブックをクリック一つで開けるようにしたい。
- リンク挿入作業を自動化して、作業時間を削減したい。
- ファイル移動にも対応できるよう、相対パスで設定したい。
VBAコードの例
以下のコードでは、セルC3に対して、現在のブックと同じフォルダにある「集計結果.xlsx」へのリンクを挿入します。
Sub InsertLinkToAnotherWorkbook()
Dim linkTargetPath As String
Dim linkCell As Range
' 相対パスでリンク先ブックのパスを指定
linkTargetPath = ThisWorkbook.Path & "\集計結果.xlsx"
' ハイパーリンクを挿入するセル
Set linkCell = ActiveSheet.Range("C3")
' ハイパーリンクの挿入
ActiveSheet.Hyperlinks.Add _
Anchor:=linkCell, _
Address:=linkTargetPath, _
TextToDisplay:="集計ファイルを開く"
End Sub
コードのポイント解説
| 要素 | 説明 |
|---|---|
ThisWorkbook.Path | 現在のブックが保存されているフォルダのパスを取得します。 |
& "\集計結果.xlsx" | 相対パスで同一フォルダ内のブックを指定しています。 |
Hyperlinks.Add | 指定セルにハイパーリンクを追加するVBAの標準構文です。 |
絶対パスで指定したい場合は？
たとえば、明示的にファイルのフルパスを指定する場合は、次のようにします。
Address:="C:\Users\ユーザー名\Documents\集計結果.xlsx"
相対パス指定のメリット
- フォルダごと別の場所に移動してもリンク切れにならない。
- 複数の人とファイルをやり取りする際に便利。
- OneDriveや共有ドライブ上でも柔軟に対応可能。
まとめ
Excel VBAを使えば、セルに他のExcelファイルへのハイパーリンクを手軽に挿入できます。
特にThisWorkbook.Pathを使って相対パスで指定することで、リンクの保守性が高まり、チーム内での運用がしやすくなります。
大量のリンクを手動で挿入する手間や、リンク切れの心配から解放されるこの方法を、ぜひ日々の業務にお役立てください。
副業から独立まで「稼げる」Webスキルを習得する（PR）
ここまで読んでいただきありがとうございます。 最後に宣伝をさせてください。
「副業を始めたいが、何から手をつければいいかわからない」「独学でスキルはついたが、収益化できていない」という悩みを持つ方には、マンツーマン指導のWebスクール**「メイカラ」**が適しています。
このスクールは、単に技術を教えるだけでなく、**「副業として具体的にどう稼ぐか」**という実務直結のノウハウ提供に特化している点が特徴です。
講師陣は、実際に「副業Webライターから1年で独立して月収100万円」を達成したプロや、現役で利益を出し続けているブロガーなど、確かな実績を持つプレイヤーのみで構成されています。そのため、机上の空論ではない、現場で通用する戦術を学ぶことができます。
副業に特化した強み
- 最短ルートの提示: 未経験からでも実績を出せるよう、マンツーマンで指導。
- AI活用の習得: 副業の時間対効果を最大化するための、正しいAI活用スキルも網羅。
- 案件獲得のチャンス: 運営がWebマーケティング会社であるため、実力次第で社内案件の紹介など、仕事に直結する可能性があります。
受講者の多くは、「在宅でできる仕事を探している」「副業を頑張りたい」という20代・30代・40代が中心です。
受講前には、講師による無料説明が行われます。無理な勧誘はなく、自分に合った副業スタイルやプランを相談できるため、まずは話を聞いてみることから始めてみてはいかがでしょうか。
