代码之家  ›  专栏  ›  技术社区  ›  Carl Witthoft

需要:将OLE对象导出到Excel并指定“放置”参数的DXL代码

  •  1
  • Carl Witthoft  · 技术社区  · 8 年前

    我使用DXL代码将DOORS模块导出到Excel,包括调整图片大小并将其放置在所需单元格上。(略为修改的版本 GalacticSolutions script ). 据我所知,默认导出应用了参数“移动但不随单元格调整大小”。我希望指定“移动并随单元格调整尺寸”。这在导出后使用Excel VB宏很容易,但我希望避免该步骤。我希望有一些 Oleput() 字符串可以执行此操作,但无法计算。

    1 回复  |  直到 8 年前
        1
  •  1
  •   WhatsThePoint SO_fix_the_vote_sorting_bug    7 年前

    在脚本中,我在Excel VBA属性部分下添加了一个新常数。

    const string cExcelPropertyPlacement = "Placement"
    

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

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

    然后在“excelSizeShape”子例程的末尾调用新例程a。

    // values: 1-MoveandSize, 2-Move, 3-Freefloating
    
    excelShapeRangePlacement( objExcelShapeRange, 1 )
    

    这应设置输出到Excel中的OLE值。。