qq_39523934的博客

1 创建单元_creatcellelement2函数 Sub cell2() '创建函数 Dim ease As CellElement '定义一个单元对象 Set ease = CreateCellElement2(“131110”, Point3dZero(), Point3dOne(), True, Matrix3dIdentity()) '设置该对象等于这些 ease.Level = ...

这里写自定义目录标题Microstation利用VBA批量插入单元和文字需要的工具 Microstation利用VBA批量插入单元和文字 在油田总图绘制过程中，总是要批量插入井、间、站。我习惯的做法是，点状要素在一个图层，要素的注记在另一个图层，利用vba工具实现批量插入 需要的工具 详细工具如下： Microsoft Excel ； MICROSTATION VBA； cel文件 真实代码如下...