Tag: dxl

想要：将OLE对象导出到Excel并指定“Placement”参数的DXL代码

我正在使用DXL代码将DOORS模块导出到Excel中，包括调整图片大小并将其放在所需的单元格上。 （ GalacticSolutions脚本的稍微修改版本）。 据我所知，默认导出应用参数“移动但不与单元格大小”。 我想指定“用单元格移动和大小”。 在导出后，这很容易处理Excel的VBmacros，但我想避免这一步。 我希望有一些Oleput()string会做到这一点，但无法弄清楚。

如何检查文件是否使用OLE在Excel中打开（将excel进程打开）

我如何检查一个文件是否已经在某个Excel实例中打开？ 我使用DXL（DOORS）语言，但它应该独立于此语言。 有没有我可以调用来检查打开哪个文件的OLE方法，并将其与path/文件名进行比较？ 如果可以的话，我可以只closures那个Excel应用程序中的工作表/文件吗？ 编辑：这是我到现在为止，这个工程，但只有一次。 DXL保留一个Excel.exe进程打开，并在接下来的检查，使用实例没有打开的工作簿，甚至没有窗口。 if (confirm "File \"" fPath "\" already exists. Do you want to overwrite it?") { // check if file is opened in any Excel instance OleAutoObj oleWorkbooks = null; OleAutoObj oleExcel = null; OleAutoObj oleWorkbook = null; OleAutoArgs autoArgs = create; oleExcel = oleGetAutoObject("Excel.Application"); bool opened = false; // […]

通过DXLrecursion列出文件夹中的所有DOORS模块并写入Excel工作表

我希望有人能帮助我：（我之前search过其他问题是否适合…） 我试图用recursion的DXL函数将所有的DOORS模块列在一个特定的目录中，并将模块名称（完整path/名称）写入Excel工作表 这是我到现在为止…问题似乎是“Z”被重置为1了 在Excel VBA中，我调用这样的DXL脚本（工作）： objDoorsApp.runStr ("#include <" & sInterface & ">;;createFolderNameForRecursion ()") 它调用函数来初始调用recursion函数:(工作也是） void createFolderNameForRecursion() { int z = 1 WriteAllModulesRecursively2ExistExcel(folder("/00_Platform/30Software/30_Basis_SW/IoStck"), z); } 这是recursion函数： void WriteAllModulesRecursively2ExistExcel(Folder f, int z) { Item i Module m string ausgabe,temp OleAutoObj objExcel = oleGetAutoObject("Excel.Application") OleAutoObj objBook OleAutoObj objSheet = null OleAutoArgs oleArgs = create Object oCur Module mCur […]