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
: |! v5 \- q+ R梁大,你设置断点,调试一下,看那不对!我这没有低版本,无法判断!
! T7 m) I& Q/ ]9 n
如圖
9 k7 ]3 F, p" @# p& ?% r" p* D% o+ A 5.png
; y+ Z# y+ e/ P0 k

点评

良大是怎麽把vba的注解轉換成繁體中文的? 我這邊日文系統打開全都是無法閲讀的文字,很多表格名的引用全都變成不可讀,完全沒得測試。。。  详情 回复 发表于 2017-8-2 16:07
发表于 2017-7-30 13:03:55 | 显示全部楼层
SW2016 发表于 2017-7-30 11:59) v. D% t3 ?2 g; K" ^
多谢lhl2008大师回复。
2 w" ?$ n5 F& c经过测试,发现大师的宏提取的缩略图是文件保存时零件和装配体的位置,& T/ s& q  f" s, v
也就是 ...

$ a( l8 S0 s% L: Q1 Q, l請教SW2016大大是開組件,執行main宏就行嗎?& Y  c4 D8 z, y- T" c0 F
 楼主| 发表于 2017-7-30 13:30:21 | 显示全部楼层
ryouss 发表于 2017-7-30 13:03
" [' q! }$ P0 F請教SW2016大大是開組件,執行main宏就行嗎?
# E+ A4 G& b$ U& }
运行时,无需打开任何模型
发表于 2017-7-30 13:35:43 | 显示全部楼层
ryouss 发表于 2017-7-30 13:03
% O" r) B* G. m1 Q. a2 f3 M: u+ G請教SW2016大大是開組件,執行main宏就行嗎?
: m* V1 V* `9 @5 F2 ?0 F
回ryouss大师,不用打开任何装配体或零件,打开SW后直接点工具→宏→运行。
3 o( H; ]6 L" @& @2 i- U8 Q
% t- V+ ^: A; ]# u9 o g.png
; c$ g7 m+ I6 k( G, P3 X) v$ l" A0 C6 N9 `" |1 J: b
运行后会出现浏览文件夹的对话框,选择文件保存的文件夹就自动生成。
; \* U2 Q7 d) Y/ m
: K( @9 A- v* C6 F* n1 P+ E h.png
$ V* \* u) E, F7 N& H6 T+ N
发表于 2017-7-30 13:40:36 | 显示全部楼层
本帖最后由 ryouss 于 2017-7-30 13:42 编辑
& J; y; I0 f+ B* |3 Q
SW2016 发表于 2017-7-30 13:35
2 E8 W' R( r( @, p+ ]回ryouss大师,不用打开任何装配体或零件,打开SW后直接点工具→宏→运行。

4 B8 ]3 n: S: Y, E# v0 J" U; X謝謝回覆,還沒搞定!
+ r) k" z! i5 t- I6 W- z5 f$ Z0 p' p9 i也有可能是沒支援繁体版??1 G8 T: e: B& w% y2 ?7 F
发表于 2017-7-30 13:47:24 | 显示全部楼层
谢谢分享经验!
发表于 2017-7-30 13:55:51 | 显示全部楼层
ryouss 发表于 2017-7-30 13:40, D8 c" ^; Y% _8 x
謝謝回覆,還沒搞定!( U/ [! z% @8 h; d5 p. e* N1 ^
也有可能是沒支援繁体版??

/ h$ Y( Z0 W, a/ O2 x; _7 Kryouss大师是否装了两个SW版本?
发表于 2017-7-30 15:06:08 | 显示全部楼层
本帖最后由 ryouss 于 2017-7-30 15:10 编辑 0 w8 E8 G) @: l1 v' i. H, @2 Z
SW2016 发表于 2017-7-30 13:55
3 Z" ~& R+ B& g) t( w, m& q( Fryouss大师是否装了两个SW版本?

4 ]6 ~, f& Y( M- S為了方便眾友,自用筆電三個 2012,2015,2017% J3 c6 q2 m" s) m" w- S  [
針對本主題會有影響嗎?
8 m) ?" a- x3 J" c1 K6 f1 F8 A; I
发表于 2017-7-30 15:26:32 | 显示全部楼层
本帖最后由 SW2016 于 2017-7-30 15:30 编辑 ' E) p  l# F+ m
ryouss 发表于 2017-7-30 15:064 F* Q/ D+ W' D9 l1 y5 J- i  O, U
為了方便眾友,自用筆電三個 2012,2015,2017
2 f: m( |# S* D+ R  g針對本主題會有影響嗎?
* a  N2 e2 y- G& [* N, I
肯定有影响,大师不妨用2017试试。
# D: k3 S6 T9 e; q  _: I; B只是不清楚2017支持哪个Excel版本,也不知lhl2008大师的宏对Excel版本是否有要求。
# S3 Z, Z+ ?) o  _+ s
发表于 2017-7-30 16:10:44 | 显示全部楼层
SW2016 发表于 2017-7-30 15:26! ~/ o, z6 n3 W3 v: R. g8 U, |
肯定有影响,大师不妨用2017试试。
4 x$ C% v7 T) N3 f只是不清楚2017支持哪个Excel版本,也不知lhl2008大师的宏对Excel版 ...

+ [0 W& f, ^8 \! ?2017試了,一樣是空白Excel
发表于 2017-7-30 16:26:46 | 显示全部楼层
试过,运行宏后,无反应。" X% d2 ]! p2 }7 p; R2 Y
用的是SW2015,Excel2010。是Excel版本的关系吗?2 X1 l+ Y& N* K, V9 K

点评

巧遇28大  详情 回复 发表于 2017-7-30 19:03
发表于 2017-7-30 19:03:53 | 显示全部楼层
287636713 发表于 2017-7-30 16:268 y) y, p) o" Q( ^6 O. h6 r/ f
试过,运行宏后,无反应。
+ Q: e' _5 W) a, \# A/ |用的是SW2015,Excel2010。是Excel版本的关系吗?
2 }5 b# R; y5 U& k
巧遇28大
发表于 2017-7-30 19:40:35 | 显示全部楼层
Sw2012 64bit office 2007: D. w* m; W* ~: o, ?1 w: {
运行宏后,选择文件夹,excel中只能显示一个零件的相关内容
" J; e; T$ ?0 N- e+ m9 {' Q7 r其实文件夹中有多个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试过,无反应,优先级别全部统统设置一次,还是无反应,求解!, Y7 J) n5 |# N+ u+ e' Z
802.gif
发表于 2017-8-2 15:37:12 | 显示全部楼层
lhl2008 发表于 2017-7-29 19:11
5 D6 N' p: U5 i- j如果没有反应,注意在VBA编辑器中将引用修改成你当前计算机所安装的相关控件
" t3 X0 p; V0 y) ?4 f' K
大大,弄了N久,没成功,提示:用户定义类型未定义(Dim PrevBmp As stdole.StdPicture),见下图,求解! 802.gif
+ b' X5 }8 g9 R6 S, r
发表于 2017-8-2 16:07:39 | 显示全部楼层
ryouss 发表于 2017-7-30 12:599 C& y1 ^. ]/ u; |
如圖
8 v+ Y/ ~( V2 D$ m( P0 P6 \5 e0 X
良大是怎麽把vba的注解轉換成繁體中文的?
' N& w3 @1 C6 s我這邊日文系統打開全都是無法閲讀的文字,很多表格名的引用全都變成不可讀,完全沒得測試。。。
发表于 2017-8-2 16:22:03 | 显示全部楼层
建议遍历装配体,再获取属性,因为在设计中,文件夹内有许多设计中放弃的垃圾零配件不好清理。  这个哪位高手改编一下  哈哈那就完美了
发表于 2017-8-2 16:35:33 | 显示全部楼层
sihouko 发表于 2017-8-2 16:07
  z' Z) I; e& e2 r1 T良大是怎麽把vba的注解轉換成繁體中文的?
' v$ M. T# B6 a9 w我這邊日文系統打開全都是無法閲讀的文字,很多表格名的引用 ...
7 W! @6 p! ]' Y$ j, E! g+ {
是用這軟件 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
* w2 R, Z  W8 g1 ^- D% ]+ L是用這軟件 ConvertZ.exe 簡繁複製切換就是.
2 R- s; b6 I4 n0 [
感謝。,,,
" h1 U  t  z# v, E1 q- ~切換ok,貼囘去還是亂成一團。。vba編輯器依舊這麽神奇。。5 j+ _3 ^( n- [) N! S1 _
不逐條修正成英文是沒辦法繼續下去了。。。
发表于 2017-8-2 21:01:04 | 显示全部楼层
流量不足 如何兑换呀?
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

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

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