与Office操作环境的整合适用版本：标准版、工程版、专业版、企业版

除了可以跟PowerPoint简报整合应用外，我们也可以跟Microsoft Word进行更专业的文案制作，或是跟Microsoft Excel整合，以制作出效果更佳的图表。这些工作实际上跟PowerPoint简报整合应用方式一样，然而除了利用 复制   贴上 的方式或是 插入   物件 的方式，我们还可以轻易地在Office工具列中加入Visio的图示，让使用者只需按一下此图示，便能自动把Visio物件嵌入到Office文件中。或者更可以利用Office特有的VBA巨集功能，以进行更多的整合应用，接着让我们一同来探讨这个主题。

把Visio图示嵌入到Office工具列中

要把Visio图示嵌入到Office工具列中的方法为：

  1. 先把目前已开启的Office应用程式全部关闭。
  2. 一般而言，当我们以预设方式来安装Visio 2000时，Visio会被安装在「C:\Program Files\Visio\」路径之中，请找到「C:\Program Files\Visio\System\Custom」的目录。

    3. 如果您的Visio不是安装在预设路径中，请试着找到当初您所设定路径中的「\System\Custom」目录。

    注意

    如果您的Visio不是安装在预设路径中，请试着找到当初您所设定路径中的「\System\Custom」目录。

  3. 执行一个名为「insert Visio Buttons」的程式。


  4. 接着开启Word、Excel或是PowerPoint任何一个应用程式，此时我们会发觉工具列中多了一个Visio图示。


  5. 试着按下Visio图示，便能直接在Office文件中嵌入Visio流程图表资料。


利用VBA巨集功能进行整合应用

Microsoft Visio 2000提供了与Office相同的程式撰写环境，让我们可以藉由VBA (Visual Basic for Application)程式语法撰写更多整合应用的解决方案。要利用VBA来撰写程式，您只需在Visio环境中选择 工具   巨集   Visual Basic编辑器 ，或是直接按下快速键 Alt + F11 ，便会开启 Visual Basic编辑器 ，藉由 Visual Basic编辑器 ，我们可以自行开发更多与Office整合的解决方案。


有关如何利用VBA自行开发与撰写解决方案，您可以参考其他相关的书籍，在此笔者便不赘言。不过，为了让读者感受一下Visio整合Office的威力，我们不妨来练习一个由VBA所撰写好与Visio整合的解决方案。

在这项练习中，我们试着把一家糖果公司的生产流程以视觉化的方式来呈现，同时把各种糖果的生产设备成本一一建立在Microsoft Access资料库之中。最後，把各种设备图件放到Visio页面中时，我们希望这些设备的总成本资料能交由Excel计算出，然後再传送回Visio页面之中。


利用Visio所制作出来视觉化的BOM图表

接着我们便一同来练习这个范例：

  1. 开启光碟范例「Candy」路径下的「Candy Equipment SFA Demo」档案。
  2. 从 Candy Equipment SFA Demo 模版中，拖曳 Conveyor 图件到页面中。


  3. 接着会出现 Select Database Record 对话方块，请在 Value 1 中选择 RustBelt ，在 Value 2 中选择 CB-LP2 。


  4. 此时我们会发觉，当我们选择不同的设备型号时，Visio会自动变更其设备的风貌。
  5. 在此图件上按下滑鼠右键，再从快显功能表中，选择 Properties 指令，便能取得每个设备的价格、容量、型号等资讯。



    6. 实际上，这些资料都是建立在Microsoft Access资料库中，有兴趣的读者不妨试着开启Microsoft Access的资料库瞧瞧。


    注意

    实际上，这些资料都是建立在Microsoft Access资料库中，有兴趣的读者不妨试着开启Microsoft Access的资料库瞧瞧。


  6. 在原本输送带的图件上按下滑鼠右键，再从快显功能表中，选择 Select database record 指令。


  7. 此时会再度出现 Select Database Record 对话方块。在 Value 1 中选择 RustBelt ，在 Value 2 中选择 CB-LP4 。
  8. 接着在此输送带中放入糖果，并在图件上按下滑鼠右键，再从快显功能表中选择 Unwrapped Candy 指令，此时会发现在输送带中多了许多糖果。
  9. 请试着把输送带往右方一直延伸，若Visio发觉输送带的数量超过一段长度後，工作人员将受不了，便会发出警告讯息。


  10. 试着减少输送带的长度，直到警告不再出现，接着把 Wrapper 包装机图件放到输送带後，设定 Value 1 为 Rust-O-Matic ， Value 2 为 CW-LP4 。
  11. 同样地，我们也可以按下滑鼠右键，再从快显功能表中，选择 Properties 指令，以了解包装机的价格、容量、型号等资讯。
  12. 接着在 Wrapper 包装机上加上 Paper Feeder 包装纸供应器，并设定 Value 1 为 Fib-O-Feed ， Value 2 为 PF-HP4 。
  13. 在 Wrapper 包装机的右侧再加上输送带 Conveyor ，并设定 Value 1 值为 RustBelt ， Value 2 值为 CB-LP4 。
  14. 接着在此输送带中放入已包装好的糖果，并在图件上按下滑鼠右键，再从快显功能表中，选择 Wrapped Candy 指令，此时会发现在输送带中多了许多包装好的糖果。
  15. 最後会得到像下图的结果：


  16. 接下来，我们想要在各项设备中加上标签说明。请试着从 Candy Equipment SFA Demo 模版中，拖曳 Auto-label Callout 图件到页面的设备上，我们会发觉随着放置的位置不同，所标示的资料便会有所不同！


  17. 最後，我们想要针对所有放在页面上的设备进行各项财产计算。请按下页面上的 Generate BOM 钮，此时Visio会启动嵌入的Excel程式以进行计算工作，然後再把自动计算出来的结果传回试算报表中。


  18. 按下 Clear BOM 钮以清除其中的计算资料。

在此练习中，我们体验到Visio利用VBA开发出与Office充分整合的解决方案。当然罗，如果读者对此练习范例有兴趣，便可开启其中的 VBA编辑器 来学习更多的技巧，至於如何发挥，就由读者自行想像了！


利用快速键Alt + F11便能开启此范例的VBA程式