找回密码
 成为会员
Greetings!CATIA 模型下载CATIA V5安装包下载合集CATIA常用基本命令视频教程
CATIA V5-6R2018下载查看高版本CATIA文件CATIA V5-6R2015下载CATIA V5-6R2014下载
CATIA V5R21 64位下载CATIA V5R21 32位下载CATIA V5R20下载CATIA 基础视频教程
查看: 9509|回复: 1

[求助] 关于catia的宏命令,高手来

[复制链接]
  • TA的每日心情
    擦汗
    2016-8-3 19:37
  • 签到天数: 1 天

    [LV.1]初来乍到

    发表于 2016-8-3 19:49:26 | 显示全部楼层 |阅读模式
    新手如何挣金币,提高权限         catia新手群:37932140欢迎大家加入!
    1金币
    我需要用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




    回复

    使用道具 举报

  • TA的每日心情
    擦汗
    2016-8-3 19:37
  • 签到天数: 1 天

    [LV.1]初来乍到

     楼主| 发表于 2016-8-4 14:27:56 | 显示全部楼层
    新手如何挣金币,提高权限         catia新手群:37932140欢迎大家加入!
    谁能帮我解决,给个解决的方案,就是用vbs写个程序使得excel的数据变成坐标点导入到catia里面,发红包有酬谢,联系我qq1525588389,



    求高手来
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 成为会员

    本版积分规则

    Archiver|手机版|小黑屋|Catia8.com

    GMT+8, 2024-7-23 00:34 , Processed in 0.030149 second(s), 16 queries , Gzip On.

    Powered by Discuz! X3.4

    © 2001-2013 Comsenz Inc. Design CATIA8

    快速回复 返回顶部 返回列表