superx 发表于 2016-8-3 19:49:26

关于catia的宏命令,高手来

我需要用catia建船模,利用编写的 CATIA 宏命令调用以 EXCEL 文件形式存储的型值表,但是那个ms vbsript不熟悉,谁能帮帮找到调用excel里面数据的语句,下面是我自己建了一个excel测试
Dim partDocument1 As Document
Set partDocument1 = CATIA.ActiveDocument
Dim part1 As Part
Set part1 = partDocument1.Part
dim excel as object
set excel=getobject("C:\Users\Administrator\Desktop\外形数据.xls")
i=1
do while x<>3
x=excel.worksheets(1).cells.range("B" & trim(cstr(i))).value
y=excel.worksheets(1).cells.range("C" & trim(cstr(i))).value
z=excel.worksheets(1).cells.range("D" & trim(cstr(i))).value
Dim hybridShapePointCoord1 As HybridShapePointCoord
Set hybridShapePointCoord1 = hybridShapeFactory1.AddNewPointCoord(x,y,z)
hybridBody1.AppendHybridShape hybridShapePointCoord1
part1.InWorkObject = hybridShapePointCoord1
i=i+1
loop
part1.Update
End sub




superx 发表于 2016-8-4 14:27:56

谁能帮我解决,给个解决的方案,就是用vbs写个程序使得excel的数据变成坐标点导入到catia里面,发红包有酬谢,联系我qq1525588389,



求高手来
页: [1]
查看完整版本: 关于catia的宏命令,高手来