有excel高手老师吗？上面的标题是一个个带超连接的图形，怎么实现点击下去就变颜色，点另外一个这个就恢复黑色！

吴春华bsk 追问

2026-03-16 16:56

我记得我以前做的时候不用条件格式的，你这个很复杂，有其他方法吗

朴老师 解答

2026-03-16 16:58

步骤 1：把所有标题做成「本文档超链接」
选中一个标题图形 → 右键 → 超链接 → 链接到「本文档中的位置」，选择对应工作表。
给所有标题都做一遍超链接。
步骤 2：修改「超链接」样式为黑色
打开「开始」选项卡 → 样式组 → 点击「单元格样式」下拉箭头。
右键「超链接」样式 → 修改 → 字体颜色设为黑色，确定。
右键「已访问的超链接」样式 → 修改 → 字体颜色设为你想要的高亮色（比如蓝色），确定。

吴春华bsk 追问

2026-03-16 17:10

老师你那个方法只是报表封面的超连接变了颜色，而上面的形状超连接没变化。我要的效果是点资金汇总他会变红色，点其他他变回原来的颜色

朴老师 解答

2026-03-16 17:12

给所有形状绑同一个宏，一键实现点击高亮切换

吴春华bsk 追问

2026-03-16 17:16

不懂哦，怎么邦

朴老师 解答

2026-03-16 17:18

按 Alt + F11 打开 VBA，把下面代码粘进去：
Dim lastShape As Shape
Sub 高亮切换()
    If Not lastShape Is Nothing Then lastShape.TextFrame.Characters.Font.Color = vbBlack
    Set lastShape = ActiveSheet.Shapes(Application.Caller)
    lastShape.TextFrame.Characters.Font.Color = vbRed
End Sub
右键每个形状 → 指定宏 → 选「高亮切换」。
之后点任何形状，自动变红，之前点的自动变黑。