需要:将 OLE 对象导出到 Excel 并指定 "Placement" 参数的 DXL 代码

Wanted: DXL code to export OLE object to Excel and specify "Placement" parameter

我有可用的 DXL 代码将 DOORS 模块导出到 Excel,包括调整图片大小并将它们放在所需的单元格上。 ( GalacticSolutions script 的略微修改版本)。据我所知,默认导出应用参数 "Move but do not size with cell." 我想指定 "Move and size with cell." 这很容易在导出后使用 Excel VB 宏,但我想避免这一步。我希望有一些 Oleput() 字符串可以做到这一点,但无法弄清楚。

我今天刚刚解决了这个问题。 在脚本中,我在 Excel VBA 属性部分下添加了一个新常量。

const string cExcelPropertyPlacement = "Placement"

创建了一个新的小子程序:

void excelShapeRangePlacement( OleAutoObj objExcelShapeRange, int OlePlacement ) {
   oleResult( olePut( objExcelShapeRange, cExcelPropertyPlacement, OlePlacement ) )
}

然后在 "excelSizeShape" 子例程的末尾调用新例程。

// values: 1-MoveandSize, 2-Move, 3-Freefloating

excelShapeRangePlacement( objExcelShapeRange, 1 )

这应该将 OLE 输出的值设置为 Excel..