第 08 章 邪修秘录

ShapeSheet、VBA、手诀与非常规用法——正道招式之外的野路子，用好了就是登堂入室。

第五天，衡师傅把办公室的门反锁了，拉上窗帘，神神秘秘地从柜子里掏出一本手抄本，封面上歪歪扭扭写着四个字：邪修秘录。

「江湖上管这些叫『邪修』，」他把本子拍在桌上，「其实都是正经到不能再正经的本事——只不过大多数人一辈子没打开过这几个抽屉。今天学的每一招，都会让你从此看维梭像看另一个软件。」

ShapeSheet 天书

「第一页，ShapeSheet——形状背后的天书。」他打开「文件 → 选项 → 自定义功能区」，勾选了「开发工具」，功能区立刻多出一个新选项卡，「你看，几乎没人知道这个选项卡的存在。」

「右键任意形状 → 显示 ShapeSheet——」屏幕上展开一张密密麻麻的表格，「每个形状的一切都在这里：位置 PinX/PinY、宽高 Width/Height、填充色 FillForegnd、几何形状 Geometry……这些格子不是死的，是公式。你改一个格子，形状立刻变。」

他现场演示了一招：选中一个矩形，把它的 Width 改成 =Height*2——矩形当场变成两倍高的瘦长条。「你再去拖它，它永远保持这个比例。这叫参数化形状：形状不是画出来的，是算出来的。」

ShapeSheet · 一角

// 让矩形的宽永远等于高的两倍（输入到 Width 单元格）
= Height * 2

// 让文字居中于形状中心（输入到 TxtPinX / TxtPinY）
= Width  * 0.5
= Height * 0.5

// 按数值变色：占用率 > 80% 时填充变红（输入到 FillForegnd）
= IF(Prop_占用率 > 0.8, RGB(176,58,46), RGB(26,107,90))

    <path d="M360,60 L380,42 L400,60 Z" fill="#87918c"/>
    <text x="470" y="80" text-anchor="middle" font-size="13" font-weight="700" fill="#242a28">参数化之后</text>
    <rect x="430" y="96" width="200" height="100" rx="8" fill="#e8f2ee" stroke="#1a6b5a" stroke-width="2"/>
    <text x="530" y="140" text-anchor="middle" font-size="12" fill="#1a6b5a">宽恒等于高的 2 倍</text>
    <text x="530" y="162" text-anchor="middle" font-size="11" fill="#14503f">拖不坏、缩放不变形</text>
    <text x="470" y="220" text-anchor="middle" font-size="11" fill="#87918c">公式即形状：改一个格子，形状立刻变（示意）</text>
  </svg>

ShapeSheet 天书一角：公式驱动形状，改一格、变全形

「还有两个邪门抽屉：Actions 节——给形状的右键菜单加你自己的命令；Events 节——让形状『双击时』自动干一件事。配合后面说的 VBA，一个形状可以有自己的小脾气。」

VBA 御剑

「第二页，御剑术——VBA。维梭和 Word、Excel 是同一家的兄弟，一样藏着 VBA 编辑器。」他按下 Alt+F11，「插入 → 模块，写几行，F5 一按，它替你干活。」

VBA · 批量把页面上所有形状的填充色改成墨绿

Sub BatchGreen()
    Dim shp As Shape
    For Each shp In ActivePage.Shapes
        shp.CellsU("FillForegnd").FormulaU = "RGB(26,107,90)"
    Next shp
End Sub

「一百个形状要改样式？手改半小时，写宏三分钟。把重复的事交给剑自己去做，这是邪修第一铁律。现在流行让 AI 帮你写这段 VBA——完全可行，但记住两条：」

⚠️ 御剑戒律（宏安全）

① 带宏的文件要另存为 .vsdm （启用宏的绘图），普通 .vsdx 不存宏；② 别人的宏别乱开——文件 → 选项 → 信任中心 → 宏设置，只启用「数字签名的宏」或可信来源的宏。剑越利，越要握住鞘。

手诀（快捷键）

「第三页，手诀——高手快，一半快在手不离键。」他把本子翻到密密麻麻的一页，「不用全背，先记这十三个：」

「记住 F4 和 Ctrl+拖拽 这两个，一天能帮你省下两小时。剩下的，用着用着就熟了。」

邪修用法

「最后一页，才是真正的『邪修』——拿维梭干那些『官方没想过』的活。」衡师傅的眼睛亮起来：

• 当 PPT 用（F5 全屏演示）：画好多页图，按 F5 进入全屏演示模式，一页一页翻——它就是一套幻灯片。系统架构汇报、方案评审，图里讲最顺。
• 当动画用（图层 + 导出序列）：把「演进过程」拆到几个图层，按图层导出成序列图，再丢进 PPT 自动播放——从现状到未来的演化，观众一目了然。
• 当原型用（UI 线框图）：画网页、App 的线框草图，比 PPT 顺手，比专业工具轻。产品经理救场神器。
• 当仪表盘用（数据图形）：第 06 章那招：形状 + 数据图形 = 带状态的仪表盘。机房温度、仓库占用、项目进度，全图实时变色。
• 当门户用（超链接 + ScreenTip）：给形状挂超链接（网页 / 文件 / 另一页），鼠标悬停有 ScreenTip 提示——一张图变成导航首页。
• 当小系统用（VBA 批处理）：批量改样式、自动生成图表、从 Excel 灌数据成图——让 AI 写宏，你只管验收。图也能「自动化」。

「最后送你一句邪修的底牌——」他合上本子，「**工具是死的，用途是活的。**你看到的是『画流程图的软件』，我看到的是『能把任何关系可视化的画布』。招式可以邪，心不能邪；用得好是登堂入室，用歪了才叫邪修。」

第 08 章 · 练功札记

ShapeSheet = 形状天书（公式驱动，右键 → 显示 ShapeSheet，开发工具选项卡先开）；VBA = 御剑（Alt+F11，宏存 .vsdm，注意信任中心）；手诀 13 式（F4 重复、Ctrl+拖拽复制、F8 对齐…）；邪修六用：PPT 演示 / 图层动画 / UI 原型 / 数据仪表盘 / 超链接门户 / VBA 自动化。