在单元格中插入超链接后无法直接链接到图表工作表
Excel中的工作表类型除常用的普通工作表外,还有图表工作表等。有时用户会把图表放入到图表工作表中,这就会带来一个问题:当在单元格中插入超链接后,该超链接无法直接链接到图表工作表。那么,如果要通过单元格超链接的方式链接到图表工作表,该怎样操作呢?
利用简单的VBA代码可轻松解决这个问题。例如下图为某产品的年销售数据,工作簿中已包含两个图表工作表,需要在D17和D21单元格中分别插入一个超链接,各自链接到对应的图表工作表中。
步骤如下:
1、插入超链接
在单元格中插入超链接时,让单元格显示的内容为图表工作表名称,并让超链接目标指向本单元格或附近的单元格。以D17为例,右击D17单元格,在弹出的快捷菜单中选择“超链接”,弹出“插入超链接”对话框,在“链接到”区域选择“本文档中的位置”,在“或在次文档中选择一个位置”处选择当前工作表,本例为“Sheet1”,在“请键入单元格引用”处输入设置超链接的单元格,本例为“D17”,在“要显示的文字”处输入需要链接的图表工作表名称,本例为“销售条形图”,如图所示。
单击“确定”,即可在D17单元格中插入一个超链接。D21单元格的操作方法类似。
2、添加VBA代码
按Alt+F11,打开VBA编辑器,在代码窗口中输入:
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)On Error Resume NextSheets(Target.Range.Value).ActivateEnd Sub
说明:在工作表中单击超链接时触发Worksheet.FollowHyperlink事件,“Sheets(Target.Range.Value).Activate”激活对应的图表工作表,该语句也可改为“Sheets(Target.TextToDisplay).Activate”。
这样设置后,单击单元格中的超链接,如果单元格中内容为某个图表工作表名称,就会打开该图表工作表。
值得一提的是,在WPS表格中,“图表工作表”名称已包含在“插入超链接”对话框中,因而可以直接将单元格中的超链接链接到“图表工作表”。