机械社区

 找回密码
 注册会员

QQ登录

只需一步,快速开始

搜索
查看: 2929|回复: 8

SW转格式求助

[复制链接]
发表于 2018-6-3 19:16:25 | 显示全部楼层 |阅读模式
请教各位高手,solidworks零件做了20个配置,怎么样一次性把这20个配置的零件全部转为stp或者xt等中间格式。避免一个一个去另存为!!恳请高手们指导
1 y4 j% b4 W1 \5 z8 E3 @- @
回复

使用道具 举报

发表于 2018-6-3 20:50:17 | 显示全部楼层
本帖最后由 未来第一站 于 2018-6-3 22:23 编辑 6 S- ?1 P: g$ }. {. Y, t; y( f
/ w# v( i7 B" ]+ ]  U$ Y- b8 u& J
期待高手出现。
回复 支持 反对

使用道具 举报

发表于 2018-6-3 22:32:24 | 显示全部楼层
不是高手,但我以前做过。  d9 R$ u6 \5 Y$ g0 w
& {6 q7 k7 L/ h. T( \5 q
1、建一个装配体
, A+ _) a% C- W' ]2、阵列这个零件20件(或插入这个零件20个)
# H' `/ {' W' H3、把阵列解除,每个零件一个配置; N$ C: j5 S7 Q  T. K# C* S/ T- n
4、将这个装配体保存为中性格式
  R/ s" O7 ]/ G& K$ w5 Q7 E& q5 s  z7 p% S3 J- K5 s

评分

参与人数 2威望 +2 收起 理由
魍者归来 + 1 剑走偏锋,666
未来第一站 + 1 热心助人,专业精湛!

查看全部评分

回复 支持 2 反对 0

使用道具 举报

 楼主| 发表于 2018-6-4 08:08:50 | 显示全部楼层
可是 这样20个零件都转到一个零件图里面了呀   怎么样能分成20个独立的零件呢
回复 支持 反对

使用道具 举报

发表于 2018-6-4 08:40:09 | 显示全部楼层
风客008 发表于 2018-6-4 08:08
; t! I: C, D4 y. s可是 这样20个零件都转到一个零件图里面了呀   怎么样能分成20个独立的零件呢
) l& U3 s7 t& c; ]
它本身是装配体格式,你用别的软件打开,识别也应是装配体,保存一次,所有零件就都保存上了。) \& W3 A: V: \4 X& g' k
/ z# @8 D# U: Y( ]. I6 E+ D
至少SW是这样的。
$ a/ u: X7 [+ }/ u$ \5 {' W1 w
回复 支持 反对

使用道具 举报

发表于 2018-6-4 09:40:08 | 显示全部楼层
你们忽略了sw本身带的功能了

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册会员

x
回复 支持 0 反对 1

使用道具 举报

发表于 2018-6-4 09:57:24 | 显示全部楼层
本帖最后由 DaveChan 于 2018-6-4 10:01 编辑
6 s* q: F& D# \8 T: G$ l" I9 y" J  e
! P" M9 _1 Y+ z一个简单的宏程序供参考:
  1. Option Explicit
    # @* n* d% y- b& ^5 @3 b3 Y
  2.     Dim swApp               As SldWorks.SldWorks
    % v# m5 l' p4 |7 |; C( E. u) h2 V
  3.     Dim swModel             As SldWorks.ModelDoc2
    ( G4 t# R1 [( O, `: H! D
  4.     Dim PartName            As String$ Y% a& f* V7 X2 o: f% N
  5.     Dim ConfigNameArr       As Variant
    9 C! \$ U6 W' |; [) ]( Y
  6.     Dim ConfigName          As Variant9 q# R9 y* J/ K
  7.     Dim AConfigName         As String
    * i; Y' E1 X* F* ~% @
  8.     Dim FilePathName        As String
    " x' @1 ]1 n$ {7 r9 D
  9. 8 p# X$ j6 _0 f0 r/ Y$ A0 V
  10. Sub main()) O- N. v+ T: w& N
  11.     Set swApp = Application.SldWorks
    ! A, B1 x/ J0 u3 G1 y* ?4 f
  12.     Set swModel = swApp.ActiveDoc2 c; x# v- n7 J) ], d
  13.     If swModel Is Nothing Then Exit Sub
    , a1 {8 A. l1 r* u" f; q
  14.     If swModel.GetType <> 1 Then Exit Sub
    1 A" n: V: u) D" I+ D$ ^
  15.     PartName = Left(swModel.GetPathName, Len(swModel.GetPathName) - 7)$ K9 Y' ]1 e3 G! j  ]* ]
  16.     ConfigNameArr = swModel.GetConfigurationNames
    3 l* g- F' }3 F
  17.     AConfigName = swModel.GetActiveConfiguration.Name% z3 d3 n5 F, h1 Q( p! t
  18.     For Each ConfigName In ConfigNameArr7 y3 z% a7 n3 l4 B" q
  19.         swModel.ShowConfiguration2 ConfigName
    1 `" b, }" A% O2 n: w! b& I  F5 O
  20.         FilePathName = PartName & " " & ConfigName & ".X_T"
    , U( ]. T# H5 r
  21.         swModel.SaveAs2 FilePathName, 0, True, False; B2 k* k8 a* A
  22.     Next7 J8 T( Q6 f1 u3 V
  23.     swModel.ShowConfiguration2 AConfigName4 o; C  u, J& i! |
  24. End Sub( H6 h9 ]) E. P* ^2 {/ v
复制代码
4 O3 _* |' P, X% M  \
回复 支持 反对

使用道具 举报

发表于 2018-6-4 10:57:51 | 显示全部楼层
1.SW自带的计划任务+ t% q' q  p5 k' V$ n" x+ d
2.宏
2 E6 h  b& k0 {3.第三方) i/ B& t; W) s, z

. q' i1 X5 L2 h# g( R6 S

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册会员

x
回复 支持 反对

使用道具 举报

发表于 2018-6-4 11:14:48 | 显示全部楼层
魍者归来 发表于 2018-6-4 10:57
* p* k8 K, P0 U, v$ f5 F/ p8 C1.SW自带的计划任务
4 U4 t3 r8 \; o( E, E3 T8 s2.宏
% r0 y6 O1 Z5 P2 v* `$ o3.第三方
1 y/ b$ z6 j" l4 t0 q% }5 a4 K
1(Task Scheduler)和3(凯元工具),应该都不能将多配置零件的各个配置存成中间格式.
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

小黑屋|手机版|Archiver|机械社区 ( 京ICP备10217105号-1,京ICP证050210号,浙公网安备33038202004372号 )

GMT+8, 2025-2-24 13:28 , Processed in 0.083744 second(s), 20 queries , Gzip On.

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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