機械社區(qū)

 找回密碼
 注冊會員

QQ登錄

只需一步,快速開始

搜索
查看: 2456|回復: 8
打印 上一主題 下一主題

SW轉(zhuǎn)格式求助

[復制鏈接]
跳轉(zhuǎn)到指定樓層
1#
發(fā)表于 2018-6-3 19:16:25 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
請教各位高手,solidworks零件做了20個配置,怎么樣一次性把這20個配置的零件全部轉(zhuǎn)為stp或者xt等中間格式。避免一個一個去另存為!!懇請高手們指導
4 Z1 ^2 k1 f" U
回復

使用道具 舉報

2#
發(fā)表于 2018-6-3 20:50:17 | 只看該作者
本帖最后由 未來第一站 于 2018-6-3 22:23 編輯 9 ^' ]3 L3 l/ ^  A: V; X9 s' k
1 L4 E3 N; C7 M' J0 U, Q
期待高手出現(xiàn)。
回復 支持 反對

使用道具 舉報

3#
發(fā)表于 2018-6-3 22:32:24 | 只看該作者
不是高手,但我以前做過。
/ d9 V+ b$ a/ e0 g2 H' x5 n6 X9 T0 c! |5 L5 O9 C
1、建一個裝配體
7 b' B: A; x" K& y8 `# z: D2、陣列這個零件20件(或插入這個零件20個)
$ c" b9 d' k% h( R8 t3、把陣列解除,每個零件一個配置) k+ e7 k+ ~: \  G
4、將這個裝配體保存為中性格式) N# h0 j; E+ x
. q  g, u2 o, M8 G

評分

參與人數(shù) 2威望 +2 收起 理由
魍者歸來 + 1 劍走偏鋒,666
未來第一站 + 1 熱心助人,專業(yè)精湛!

查看全部評分

回復 支持 2 反對 0

使用道具 舉報

4#
 樓主| 發(fā)表于 2018-6-4 08:08:50 | 只看該作者
可是 這樣20個零件都轉(zhuǎn)到一個零件圖里面了呀   怎么樣能分成20個獨立的零件呢
回復 支持 反對

使用道具 舉報

5#
發(fā)表于 2018-6-4 08:40:09 | 只看該作者
風客008 發(fā)表于 2018-6-4 08:08* B4 z. }3 W0 Q9 d* O5 [8 Y
可是 這樣20個零件都轉(zhuǎn)到一個零件圖里面了呀   怎么樣能分成20個獨立的零件呢

: T) `- h0 E3 B它本身是裝配體格式,你用別的軟件打開,識別也應(yīng)是裝配體,保存一次,所有零件就都保存上了。
; F* ~( m9 ?6 y  c0 r8 E
# l' g% y! B; F% p) m2 g* }至少SW是這樣的。
2 n0 S* K5 y+ p8 R# _5 B
回復 支持 反對

使用道具 舉報

6#
發(fā)表于 2018-6-4 09:40:08 | 只看該作者
你們忽略了sw本身帶的功能了

本帖子中包含更多資源

您需要 登錄 才可以下載或查看,沒有帳號?注冊會員

x
回復 支持 0 反對 1

使用道具 舉報

7#
發(fā)表于 2018-6-4 09:57:24 | 只看該作者
本帖最后由 DaveChan 于 2018-6-4 10:01 編輯 6 r7 l2 ?: {& P! o9 A2 k2 S
& L% ]" H+ r1 D0 ]
一個簡單的宏程序供參考:
  1. Option Explicit
    / ?: [' e9 k7 r6 Z6 ^5 d- h
  2.     Dim swApp               As SldWorks.SldWorks
    5 e2 m7 g2 I! F( h1 t& Q! L  m- {
  3.     Dim swModel             As SldWorks.ModelDoc2( \. o8 d7 F8 A* m; C
  4.     Dim PartName            As String6 \" h; l( X6 Y8 x
  5.     Dim ConfigNameArr       As Variant
    , W2 J' e, v, U' x3 f/ q
  6.     Dim ConfigName          As Variant
    6 o& C! B+ A' T1 d% q
  7.     Dim AConfigName         As String4 Z# g6 u% p7 c" }' b4 a' b" \0 S+ L
  8.     Dim FilePathName        As String
    * _' G. ]8 d/ ~8 N
  9. . ^. }$ f( r( r# i5 P% w7 ]2 h, k
  10. Sub main()9 I+ k) Q$ v! `+ a. ~' C3 M; B
  11.     Set swApp = Application.SldWorks
    ) M, z9 ]/ r9 b/ [) k# l( F  {
  12.     Set swModel = swApp.ActiveDoc, ~! d* s7 S* Q+ u* M
  13.     If swModel Is Nothing Then Exit Sub
    0 B+ B- A; u) `6 O
  14.     If swModel.GetType <> 1 Then Exit Sub
    ) t; A, C8 ]7 A; Q; S% v' v
  15.     PartName = Left(swModel.GetPathName, Len(swModel.GetPathName) - 7)
    3 K3 y* V2 h* `5 L. S  p  G! G4 E5 v" ]
  16.     ConfigNameArr = swModel.GetConfigurationNames
    % c) W/ i6 S4 ?, B" s1 `/ k
  17.     AConfigName = swModel.GetActiveConfiguration.Name
    9 y& g* b5 D% H2 z2 {  ]* F
  18.     For Each ConfigName In ConfigNameArr
    & @0 f3 G8 S! I) v$ {# V5 {, z
  19.         swModel.ShowConfiguration2 ConfigName/ ?) y' m2 d# _( R. U6 {
  20.         FilePathName = PartName & " " & ConfigName & ".X_T"! I6 _/ a6 u9 L# E
  21.         swModel.SaveAs2 FilePathName, 0, True, False
    # t: ^! l( ~' c- k$ \
  22.     Next
    % F) F, i+ p6 E! u1 S2 [4 v/ @
  23.     swModel.ShowConfiguration2 AConfigName8 P5 V5 i6 D* G0 o
  24. End Sub
      z$ w5 g+ H  K
復制代碼
' I4 o0 ?8 z* U2 U  P5 W1 h4 r
回復 支持 反對

使用道具 舉報

8#
發(fā)表于 2018-6-4 10:57:51 | 只看該作者
1.SW自帶的計劃任務(wù)
2 H/ q1 S8 {! y7 s. I; n4 A( d3 d2.宏
7 w; q8 ^) \  W5 _4 O* X' g3.第三方- N7 ]$ q/ i- z  ?+ T: B+ r5 C
2 a7 O0 u! Q9 u0 P4 Z* Z

本帖子中包含更多資源

您需要 登錄 才可以下載或查看,沒有帳號?注冊會員

x
回復 支持 反對

使用道具 舉報

9#
發(fā)表于 2018-6-4 11:14:48 | 只看該作者
魍者歸來 發(fā)表于 2018-6-4 10:57
7 A; ^8 N( M& h  V( i5 B1.SW自帶的計劃任務(wù)
" A' I7 O9 C8 {; u) V2.宏+ R" F1 T# g9 k0 ^
3.第三方

. {" C' U( `) U. x8 V& J& x; x1(Task Scheduler)和3(凱元工具),應(yīng)該都不能將多配置零件的各個配置存成中間格式.
回復 支持 反對

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 注冊會員

本版積分規(guī)則

小黑屋|手機版|Archiver|機械社區(qū) ( 京ICP備10217105號-1,京ICP證050210號,浙公網(wǎng)安備33038202004372號 )

GMT+8, 2024-9-29 05:37 , Processed in 0.055034 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回復 返回頂部 返回列表