QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
goto3d 说: 版主微信号:caivin811031;还未入三维微信群的小伙伴,速度加
2022-07-04
全站
goto3d 说: 此次SW竞赛获奖名单公布如下,抱歉晚了,版主最近太忙:一等奖:塔山817;二等奖:a9041、飞鱼;三等奖:wx_dfA5IKla、xwj960414、bzlgl、hklecon;请以上各位和版主联系,领取奖金!!!
2022-03-11
楼主: lhl2008
收起左侧

[原创] 批量输出文件自定义属性及缩略图到Excel

[复制链接]
发表于 2017-7-30 12:59:10 | 显示全部楼层
lhl2008 发表于 2017-7-30 11:25$ p& J& U; J3 w) E! l- B5 z+ P
梁大,你设置断点,调试一下,看那不对!我这没有低版本,无法判断!

1 }( c8 u, x* o& r- z' V如圖
8 h% ?1 S' @+ @8 H+ D' G 5.png
" I" ^( Z; C! k+ b  G

点评

良大是怎麽把vba的注解轉換成繁體中文的? 我這邊日文系統打開全都是無法閲讀的文字,很多表格名的引用全都變成不可讀,完全沒得測試。。。  详情 回复 发表于 2017-8-2 16:07
发表于 2017-7-30 13:03:55 | 显示全部楼层
SW2016 发表于 2017-7-30 11:59  q7 F) g6 }0 H9 D; a: m" x3 ]" b
多谢lhl2008大师回复。+ y4 ^9 q% n2 X
经过测试,发现大师的宏提取的缩略图是文件保存时零件和装配体的位置,, v" b- m* t9 l; c% H& z2 f7 `# @
也就是 ...

' ]( x6 z9 I7 N- `請教SW2016大大是開組件,執行main宏就行嗎?2 Q2 Q- x4 x+ e* N0 X; x2 E
 楼主| 发表于 2017-7-30 13:30:21 | 显示全部楼层
ryouss 发表于 2017-7-30 13:03
) I  J3 S+ m! r7 T& p8 D* i, I  _# h請教SW2016大大是開組件,執行main宏就行嗎?

" `7 L7 v& p5 _% m- V( c4 _7 {运行时,无需打开任何模型
发表于 2017-7-30 13:35:43 | 显示全部楼层
ryouss 发表于 2017-7-30 13:036 ^+ ^! z7 v* i* s0 c6 ^, p
請教SW2016大大是開組件,執行main宏就行嗎?
3 T. P  O# c) `  L5 H  E
回ryouss大师,不用打开任何装配体或零件,打开SW后直接点工具→宏→运行。
* |& B: h5 f, |( H8 g! e& |: g' A
g.png
8 |2 f# h; a, D
2 N% Q# U" ?1 g! g  N% ~; Q: i- ]运行后会出现浏览文件夹的对话框,选择文件保存的文件夹就自动生成。/ Z. I4 \- ~/ P& n# \. |
: [! V4 ]: L+ Q9 R
h.png # s" W% K2 v; Q
发表于 2017-7-30 13:40:36 | 显示全部楼层
本帖最后由 ryouss 于 2017-7-30 13:42 编辑
) f& |+ T9 `2 f5 H$ {& |
SW2016 发表于 2017-7-30 13:35% \' a( ?& v& ?7 v- [+ X
回ryouss大师,不用打开任何装配体或零件,打开SW后直接点工具→宏→运行。

/ }" ~. Q# y7 k  Q3 F# N謝謝回覆,還沒搞定!
6 v' `+ u4 N  x8 e' {; G也有可能是沒支援繁体版??
% s9 k. J6 n7 D0 Y9 V: L! |& D- i9 x/ U
发表于 2017-7-30 13:47:24 | 显示全部楼层
谢谢分享经验!
发表于 2017-7-30 13:55:51 | 显示全部楼层
ryouss 发表于 2017-7-30 13:40
7 A/ G0 V0 L# l4 s8 A謝謝回覆,還沒搞定!
; r/ D0 c( k+ c$ c也有可能是沒支援繁体版??
' I# B! C7 D/ p% G- j9 B( w' m
ryouss大师是否装了两个SW版本?
发表于 2017-7-30 15:06:08 | 显示全部楼层
本帖最后由 ryouss 于 2017-7-30 15:10 编辑 , e: W! p) i! f0 Y& A
SW2016 发表于 2017-7-30 13:55
0 t8 G) x- s* e3 U1 wryouss大师是否装了两个SW版本?

$ A  S/ S1 X0 r3 v/ ?+ _為了方便眾友,自用筆電三個 2012,2015,2017
$ A2 X2 n9 ?2 z' O針對本主題會有影響嗎?
3 g) H9 f) O7 m; @
发表于 2017-7-30 15:26:32 | 显示全部楼层
本帖最后由 SW2016 于 2017-7-30 15:30 编辑
' |( a  R! \: u1 I$ `
ryouss 发表于 2017-7-30 15:06
- d; E! A+ r: K4 Z! O為了方便眾友,自用筆電三個 2012,2015,2017
# l9 G! Q, y8 ?" s) d針對本主題會有影響嗎?

, O% Z& O3 g) m6 N3 t1 s肯定有影响,大师不妨用2017试试。
$ Y7 ?* s( ?3 n只是不清楚2017支持哪个Excel版本,也不知lhl2008大师的宏对Excel版本是否有要求。1 l9 c9 z4 J9 {+ H0 v+ f" z' j4 N
发表于 2017-7-30 16:10:44 | 显示全部楼层
SW2016 发表于 2017-7-30 15:26
! Z0 g) n7 V9 x$ d肯定有影响,大师不妨用2017试试。
! F  r# G/ n& Q. p( F( B只是不清楚2017支持哪个Excel版本,也不知lhl2008大师的宏对Excel版 ...
$ w0 d3 r1 u; u, l9 }) L
2017試了,一樣是空白Excel
发表于 2017-7-30 16:26:46 | 显示全部楼层
试过,运行宏后,无反应。
) J( e% N2 W+ U& y用的是SW2015,Excel2010。是Excel版本的关系吗?
4 d7 }; @$ h/ @9 n/ h

点评

巧遇28大  详情 回复 发表于 2017-7-30 19:03
发表于 2017-7-30 19:03:53 | 显示全部楼层
287636713 发表于 2017-7-30 16:26
$ B# [& r& j. Q- V试过,运行宏后,无反应。2 t2 U, ]/ K. l5 p  H
用的是SW2015,Excel2010。是Excel版本的关系吗?

( Y3 H1 @! c. [5 ]9 L$ i2 p4 g3 z5 G巧遇28大
发表于 2017-7-30 19:40:35 | 显示全部楼层
Sw2012 64bit office 2007
+ y; u# P. T, B1 K* d5 H; Y  X运行宏后,选择文件夹,excel中只能显示一个零件的相关内容; d2 g& ~" V  @7 P
其实文件夹中有多个SW的模型文件,不知哪出了问题?
发表于 2017-7-31 09:16:54 | 显示全部楼层
下载学习一下
发表于 2017-7-31 12:35:09 | 显示全部楼层
无法试用,宏崩溃 怎么都解决不了。
发表于 2017-8-1 15:05:30 | 显示全部楼层
大神自定义属性可以增加么
发表于 2017-8-1 15:07:30 | 显示全部楼层
另外读取的属性如果在EXCEL中修改可以返回去修改模型中的属性么
发表于 2017-8-2 10:26:44 | 显示全部楼层
SW2015   EXCEL2013试过,无反应,优先级别全部统统设置一次,还是无反应,求解!1 K+ `6 F4 P7 p6 L0 T
802.gif
发表于 2017-8-2 15:37:12 | 显示全部楼层
lhl2008 发表于 2017-7-29 19:11( i$ A, A7 J( u8 {3 q; C
如果没有反应,注意在VBA编辑器中将引用修改成你当前计算机所安装的相关控件

; n. c# @' j8 A3 z3 y8 O! R- n; Y7 K大大,弄了N久,没成功,提示:用户定义类型未定义(Dim PrevBmp As stdole.StdPicture),见下图,求解! 802.gif ' T, f8 a# T% V
发表于 2017-8-2 16:07:39 | 显示全部楼层
ryouss 发表于 2017-7-30 12:59
9 f- X* z# b' \2 m. f# S1 O9 E如圖
, O. F' ^+ P7 ~" u  U5 d( s
良大是怎麽把vba的注解轉換成繁體中文的?
% Z* ?; w/ x% R9 X我這邊日文系統打開全都是無法閲讀的文字,很多表格名的引用全都變成不可讀,完全沒得測試。。。
发表于 2017-8-2 16:22:03 | 显示全部楼层
建议遍历装配体,再获取属性,因为在设计中,文件夹内有许多设计中放弃的垃圾零配件不好清理。  这个哪位高手改编一下  哈哈那就完美了
发表于 2017-8-2 16:35:33 | 显示全部楼层
sihouko 发表于 2017-8-2 16:07
. F$ D4 y) o2 m/ L6 {/ ]  Q良大是怎麽把vba的注解轉換成繁體中文的?
& t: ?$ {( x) T! w: c/ B' l我這邊日文系統打開全都是無法閲讀的文字,很多表格名的引用 ...
4 H6 V' S0 r. v. U8 i" y  e
是用這軟件 ConvertZ.exe 簡繁複製切換就是.

点评

感謝。,,, 切換ok,貼囘去還是亂成一團。。vba編輯器依舊這麽神奇。。 不逐條修正成英文是沒辦法繼續下去了。。。  详情 回复 发表于 2017-8-2 17:28
发表于 2017-8-2 16:47:36 | 显示全部楼层
只能羨慕了,流量不夠,
发表于 2017-8-2 17:28:26 | 显示全部楼层
ryouss 发表于 2017-8-2 16:35
5 _' v8 t1 S. Q( b3 x& w是用這軟件 ConvertZ.exe 簡繁複製切換就是.

8 \! M8 e9 Q# \# j感謝。,,,; e! o8 {. _- n- u, F
切換ok,貼囘去還是亂成一團。。vba編輯器依舊這麽神奇。。
1 @0 n9 y# N0 @0 {4 X/ ~不逐條修正成英文是沒辦法繼續下去了。。。
发表于 2017-8-2 21:01:04 | 显示全部楼层
流量不足 如何兑换呀?
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备13008828号-1 )

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