将数据从 Excel 导出到 Prism

虽然 Prism 可以打开 Excel 文件，但速度较慢。因此，建议编写一个 Visual Basic 宏，将选定的值导出为文本文件。下面的宏在 Excel 中运行，将工作表 1 的左上角区域（12 行，6 列）导出为逗号分隔值 (CSV) 文件，Prism 可以导入该文件。

Open "C:\data\july97\dr2.csv" For Output As #1

For I = 1 To 12

For J = 1 To 6

  Print #1, Worksheets(1).Cells(I,J).Value; ",";

Next

Write #1,

Next

Close #1

随后添加代码以启动 Prism、运行 Prism 脚本，并可能将结果从 Prism 导入回 Excel。

从 Excel 创建 PZC（Prism 脚本）文件

在构建从 Excel 运行 Prism 的系统时，您需要同时编辑 Excel VBA 语句和 Prism PZC 脚本。简化工作的一种方法是编写 Visual Basic 代码，将 PZC 文件从 Excel 导出。这样您只需编辑一个文件即可。例如，您可以使用以下 Visual Basic 代码：

Open "C:\Prism4\auto.pzc" For Output As #1

Print #1, “Shortlog”

Print #1, “SetPath C:\gp\prism25\”

Print #1, “Open generate.pzm”

Print #1, “openOutput fit.txt”

Print #1, “ ForEach 500”

Print #1，“ GoTo R 1”

Print #1, “ Regenerate”

Print #1，“ GoTo R 2”

Print #1，“ WCell 5,1”

Print #1，“Next”

Close #1

Shell ("C:\program files\prism5\prism.exe @C:\prism5\auto.pzc")

第一行创建了一个名为 auto.pzc 的新文件，并将其指定为文件编号 1。接下来的 10 行将您编写的 Prism 脚本命令导出到该文件中。下一行关闭该脚本文件，该文件由上文显示的最后一行启动。后续行将导入 Prism 导出的结果。

将所有命令放入一个文件在概念上并无帮助。您仍需区分 Excel 中的 VBA 代码与 Prism 的脚本命令。其优点在于您可以在一个文件内完成所有编辑，而非两个文件。缺点是编写脚本稍显困难，因为您必须将每行代码置于引号中，并在行首添加 "Print #1,"。

 

将 Prism 图表导入 Excel

除了导入 Prism 分析结果外，您可能还希望将 Prism 图表导入 Excel。导出图表不成问题，因为 Prism 脚本可以将图表或布局导出为 WMF 图片。问题在于将其导入 Excel，因为无法编写 Visual Basic 命令来导入图片。 您可以采取间接方法。在 Excel 中手动创建一个图片对象（显示控件工具栏，单击图像按钮，然后拖动以创建对象）。接着编写 Basic 代码来更改该图片对象的内容。例如：

Sheet2.DRGraph.Picture = LoadPicture(Path$ + "dr2.wmf")