久久久国产一区二区_国产精品av电影_日韩精品中文字幕一区二区三区_精品一区二区三区免费毛片爱

 找回密碼
 注冊會員

QQ登錄

只需一步,快速開始

搜索
查看: 1681|回復: 6

誰那有SolidWorks一鍵輸出工程圖到DWG宏程序?

[復制鏈接]
1#
發表于 2024-1-19 20:46:25 | 只看該作者 |倒序瀏覽 |閱讀模式
誰那有SolidWorks一鍵輸出工程圖到DWG宏程序?需要直接輸出到桌面。網上都是下面的程序,但是試了一下不行啊!" A% S. h- {+ y+ w7 N" T0 W( t! j
! N  s( b# @) r0 D6 h
Dim swApp As Object' f4 J- h5 a& j
% I4 S! O% E+ o; T
Dim Part As Object
( `: w; b' }8 h
0 Z- R) Y) j: ], [- `1 C* ~Dim Filename As String( r6 b0 [: U  f* w* i
! C& @) H2 A0 s9 o; A
Dim No As Integer
3 v' F; `0 G: l$ R7 Q/ t
; v& T3 a+ H$ H( q5 ~$ s; RDim Title As String0 k! {# e1 O+ ]3 x* T# {

5 Z" n' N, `% P7 _1 YSub main()+ U; G' O$ U7 D: [6 ~

2 @6 a9 r; v  B- G- FSet swApp = Application.SldWorks
3 W" \, c. u+ i1 V" q2 C; o, b+ f4 X. m2 t; q; W) X' C) C
Set Part = swApp.ActiveDoc2 f; x8 g$ _2 }3 D8 u
( Q( e7 _. b, D% p$ t; u! z8 B# J' G
Filename = Part.GetPathName()
5 X+ D, F+ _. g  T+ t1 N/ S! ~* I9 N/ t+ L
No = Len(Filename)
+ f. v4 r( e8 A9 u$ z0 ~/ \: }3 u
Filename = Left(Filename, No)9 o- o: R5 R5 S5 I* u# t

( s! n' Q8 k. R$ `% uPart.SaveAs2 Filename & ".DWG", 0, True, False
6 I( S6 o) W9 ~- Z7 F0 v2 X1 C( _$ U) |. m6 V! f
End Sub
3 i' Y4 o: t  E8 E8 G+ D9 x8 X7 c5 V! D

評分

參與人數 1威望 +1 收起 理由
喂我袋鹽 + 1 思想深刻,見多識廣!

查看全部評分

回復

使用道具 舉報

2#
發表于 2024-1-20 10:45:16 | 只看該作者
把文件擴展名.pdf改成.swp

本帖子中包含更多資源

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

×

評分

參與人數 1威望 +1 收起 理由
喂我袋鹽 + 1 熱心助人,專業精湛!

查看全部評分

3#
發表于 2024-1-20 10:50:02 | 只看該作者
本帖最后由 爆裂explosion 于 2024-1-20 10:51 編輯 " J- Q: h- d3 N9 W
爆裂explosion 發表于 2024-1-20 10:45
& q9 A# G2 F+ `, K( k: a9 \把文件擴展名.pdf改成.swp

+ _' R; m7 U8 J在D盤如圖創建一個文件夾,會自動保存到此文件夾. i- ~% y- z- i1 i. e0 Y) J6 S

本帖子中包含更多資源

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

×
4#
發表于 2024-1-20 11:19:39 | 只看該作者
SW有自帶的批量轉圖的呀。后來公司讓合并到一個DWG,宏還沒學過怎么用,買了插件,方便很多。

點評

沒有 ,1比1轉圖+爆炸 就不會有問題 我原來是手工刻的,為提高效率,買了插件  發表于 2024-1-22 08:16
合并到一個圖中尺寸這些東西有沒有變?原來寫過一個lsp,合并過來不是很完美,還是要人工處理一下。  發表于 2024-1-20 11:49
5#
發表于 2024-1-20 13:11:53 | 只看該作者
大工程師  不是有這個功能嗎  工程圖轉CAD  PDF都行
您需要登錄后才可以回帖 登錄 | 注冊會員

本版積分規則

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

GMT+8, 2025-7-25 15:12 , Processed in 0.071632 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.5 Licensed

© 2001-2025 Discuz! Team.

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