在Excel VBA中添加工作簿的超链接可以通过以下步骤实现：
1. 打开Excel，然后按 `Alt + F11` 打开VBA编辑器。
2. 在VBA编辑器中，找到要添加超链接的工作簿。
3. 在“插入”菜单中选择“模块”，在打开的模块窗口中编写以下代码：
```vba
Sub AddHyperlink()
Dim ws As Worksheet
Dim cell As Range
' 设置要添加超链接的工作表
Set ws = ThisWorkbook.Sheets("Sheet1") ' 修改为你的工作表名称
' 设置要添加超链接的单元格范围
Set cell = ws.Range("A1") ' 修改为你的单元格地址
' 添加超链接
With cell.Hyperlinks.Add(Anchor:=cell, Address:="", SubAddress:="", TextToDisplay:="点击这里")
.SubAddress = "https://www.example.com" ' 修改为你的链接地址
.TextToDisplay = "示例链接"
End With
End Sub
```
4. 修改代码中的 `Sheet1` 和 `A1` 为你的工作表名称和单元格地址。
5. 修改 `.SubAddress` 中的链接地址为你想要添加的超链接地址。
6. 修改 `.TextToDisplay` 中的文本为你在单元格中显示的文本。
7. 关闭VBA编辑器，回到Excel界面。
8. 按 `Alt + F8`，选择 `AddHyperlink` 宏，然后点击“运行”按钮。
这样，你就在指定的单元格中添加了一个超链接。点击该单元格时，将会打开你指定的链接地址。
