我怎么CATIA树(含半成品)导出到Excel表使用VB脚本?
2答案
这是您的宏,
子CATMain ()
昏暗的productDocument1作为文档
设置productDocument1 = CATIA.ActiveDocument
选择三种或xls的输入框
昏暗的exportFormat作为字符串
exportFormat = Inputbox(“请选择格式导出树。_类型的xls或txt”)
如果exportFormat < >“xls”
如果exportFormat < >“三种”
对话框“没有进入txt或xls。项目取消请重试宏。”
其他的
的输入框输入文件的名字
昏暗的partName作为字符串
partName = Inputbox(“请输入文件名。”)
”输入框输入文件位置
昏暗的oLocation作为字符串
oLocation = "宏观文件C: \ \ "
productDocument1。ExportData oLocation & partName &”。“& _
exportFormat,“三”
如果
如果
终止子
之前运行宏,倒数第六行上改变你的文件位置和输入扩展txt也xls格式是不工作。