找回密码
 注册会员

QQ登录

只需一步,快速开始

搜索
查看: 3555|回复: 8

SW转格式求助

[复制链接]
发表于 2018-6-3 19:16:25 | 显示全部楼层 |阅读模式
请教各位高手,solidworks零件做了20个配置,怎么样一次性把这20个配置的零件全部转为stp或者xt等中间格式。避免一个一个去另存为!!恳请高手们指导
9 Y# @# V- X0 t. Z: M" |! b7 P0 E
回复

使用道具 举报

发表于 2018-6-3 20:50:17 | 显示全部楼层
本帖最后由 未来第一站 于 2018-6-3 22:23 编辑 $ a; r& A2 \1 H
7 p5 D# q+ A9 c6 r5 |. a' L! C# [7 l
期待高手出现。
发表于 2018-6-3 22:32:24 | 显示全部楼层
不是高手,但我以前做过。
! x/ b6 H! ]. I, e$ r7 V/ c2 q1 T" [  k6 s6 S
1、建一个装配体
; H# z1 k) f3 G# e/ A  e& w2、阵列这个零件20件(或插入这个零件20个)
2 P4 n8 w2 O: x( D3、把阵列解除,每个零件一个配置
+ ~6 o. Z( {: t" I4、将这个装配体保存为中性格式4 D1 w' W0 W% h( D" `2 b5 R" b7 ^) Q4 i

! ^5 v. i! Y, G4 }

评分

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

查看全部评分

 楼主| 发表于 2018-6-4 08:08:50 | 显示全部楼层
可是 这样20个零件都转到一个零件图里面了呀   怎么样能分成20个独立的零件呢
发表于 2018-6-4 08:40:09 | 显示全部楼层
风客008 发表于 2018-6-4 08:08
+ g+ i- _( |# u  I/ S; w) i- ~& k可是 这样20个零件都转到一个零件图里面了呀   怎么样能分成20个独立的零件呢

4 M8 e# _  s7 [' W1 O5 o! a它本身是装配体格式,你用别的软件打开,识别也应是装配体,保存一次,所有零件就都保存上了。
' y0 Z% a0 d3 G. X7 ~4 P4 _# R2 Y# V4 F! w
至少SW是这样的。# x0 O" y/ U  Z4 m2 ~4 w
发表于 2018-6-4 09:40:08 | 显示全部楼层
你们忽略了sw本身带的功能了

本帖子中包含更多资源

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

×
发表于 2018-6-4 09:57:24 | 显示全部楼层
本帖最后由 DaveChan 于 2018-6-4 10:01 编辑
# q" y/ R, g; N
0 \' O1 z& ~0 v0 M, S一个简单的宏程序供参考:
  1. Option Explicit+ S% s; E/ N# @
  2.     Dim swApp               As SldWorks.SldWorks
    5 ]3 d/ S, o( ?, t/ F5 d
  3.     Dim swModel             As SldWorks.ModelDoc2* |/ C2 {! E) a. c# _  g
  4.     Dim PartName            As String) N$ O9 y+ D- d( ]  I
  5.     Dim ConfigNameArr       As Variant3 y2 D* V6 R. k& i8 \5 O; u
  6.     Dim ConfigName          As Variant" E9 s9 i$ E6 j% ^! k( P
  7.     Dim AConfigName         As String
    0 O9 F1 H* G: q: I- d" a/ m3 p
  8.     Dim FilePathName        As String7 S# }3 w7 ?. U' [

  9. 0 ]6 u/ Z% N, [% e4 a
  10. Sub main()4 O, t2 `3 t- s% o
  11.     Set swApp = Application.SldWorks
    $ l. P0 o3 {4 k6 H
  12.     Set swModel = swApp.ActiveDoc( \9 o: O! |: `  N9 V. }) g
  13.     If swModel Is Nothing Then Exit Sub
    % k1 b3 C" S) J7 Z; n0 j% e) t
  14.     If swModel.GetType <> 1 Then Exit Sub
    # W- W& d8 T( a! u
  15.     PartName = Left(swModel.GetPathName, Len(swModel.GetPathName) - 7)6 \# g' ~' m0 s5 L/ Q
  16.     ConfigNameArr = swModel.GetConfigurationNames3 F4 I2 w# |* I" I- @2 n
  17.     AConfigName = swModel.GetActiveConfiguration.Name
    % B( G$ l# F. j# @' q2 Z
  18.     For Each ConfigName In ConfigNameArr' r6 F5 `$ P3 \5 L
  19.         swModel.ShowConfiguration2 ConfigName
    ( ?3 H1 l( }7 @; C3 k, A
  20.         FilePathName = PartName & " " & ConfigName & ".X_T"
    4 ~" ^1 v# Q( G; r2 L+ Y) U# t. X
  21.         swModel.SaveAs2 FilePathName, 0, True, False$ ~/ o* o0 h7 C; v4 z2 i) r2 Y  A
  22.     Next
    , Y$ v: A" p$ |+ f
  23.     swModel.ShowConfiguration2 AConfigName- |7 \0 @4 P/ q8 `, T
  24. End Sub* l- Q" ~* {0 Q+ K* _
复制代码

; H/ }0 d& l, w. O& [8 k
发表于 2018-6-4 10:57:51 | 显示全部楼层
1.SW自带的计划任务
% L+ N) c" J5 v; ?6 S/ y% Q2.宏1 T3 p; y! n$ M7 U8 ~
3.第三方
( E- P+ x% O. {, {5 T( c7 }; s" x' \4 I7 E! Y+ W8 l

本帖子中包含更多资源

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

×
发表于 2018-6-4 11:14:48 | 显示全部楼层
魍者归来 发表于 2018-6-4 10:579 `5 y( G$ j5 |+ z
1.SW自带的计划任务
' }, |- z: S4 J2.宏1 L- d! f% ]1 I9 U
3.第三方

% Q1 T' v7 p4 s. c" f6 b8 V1(Task Scheduler)和3(凯元工具),应该都不能将多配置零件的各个配置存成中间格式.
您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

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

GMT+8, 2025-8-13 20:33 , Processed in 0.067142 second(s), 20 queries , Gzip On.

Powered by Discuz! X3.5 Licensed

© 2001-2025 Discuz! Team.

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