如何在数据透视表中创建可点击的超链接？

在工作表中，您可以轻松点击超链接以链接到其网页，但如果您创建了一个包含超链接的数据透视表，这些超链接将无法点击。您有什么好的方法来解决Excel中的这个问题吗？

使用VBA代码在数据透视表中创建可点击的超链接

使用VBA代码在数据透视表中创建可点击的超链接

默认情况下，数据透视表中的超链接是不可用的，但幸运的是，您可以通过编写VBA代码使数据透视表中的超链接变为可点击状态。

1. 按住 ALT + F11 键，打开 Microsoft Visual Basic for Applications 窗口。

2. 然后从左侧的项目资源管理器窗格中选择您正在使用的工作表，双击它以打开一个模块，然后复制并将以下VBA代码粘贴到空白模块中：

VBA代码：在数据透视表中创建可点击的超链接

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Update 20140814
If Target.Cells.Count <> 1 Then Exit Sub
On Error Resume Next
Application.ActiveWorkbook.FollowHyperlink Address:=CStr(Target.Value), NewWindow:=True
End Sub

3. 接下来保存并关闭此代码，返回到您的工作表，现在当您点击数据透视表中的超链接时，该超链接将被激活并链接到其网页。

备注：此代码仅适用于以Http://开头的网页链接。