一个“直接”在Excel里面生成缩略图的办法（“远程”调用GetPreviewXXX）

bash

% P% p/ E$ q' f" d
) D/ |3 K' D# v0 Z  Z2017.08.02 更新
" B* |4 f" @- P
0 e: [+ l9 [% s+ F/ Y SWDM-API-201X.rar (56.01 KB, 下载次数: 168)

2017-8-5 10:06 上传

点击文件名下载附件
0 |% F: d/ |; [. Y! X/ k
6 _% s! R+ D/ U+ e7 \7 U更新个不带SWDMLicenseKey的版本，使用方法见里面的使用说明, 仅供参考。
8 A! T$ m2 h8 H: D$ ^% [


* m* C, @2 d5 Z1 [7 t

0 ]" Z0 p6 {8 v7 R7 g, F

bash

2 w" M% y5 B; G+ I# }
9 h" i+ X; M1 ^$ g& _  V-

ryouss

謝謝分享,下載試試了!

qxzch

这几天关于缩略图的帖子有点火

che-zp

EXCEL是只读文件？高级版本？

keilei001

多谢分享，是不是只有缩略图而不能提取其他属性呢？

阿帕奇

qxzch 发表于 2017-7-30 13:49
这几天关于缩略图的帖子有点火

因为有大师指导了方向

bash

) d' y/ q' j; a; R$ h# {4 ?, Z( |) y

keilei001 发表于 2017-7-31 13:38
多谢分享，是不是只有缩略图而不能提取其他属性呢？

已在闷大的Excel上私自加上，但未经原作者同意，不敢私自公开。（涉及到LicenseKey）的问题。所以仅提供方法以参考。

NC@jiang@nan

bash 发表于 2017-7-31 19:12
已在闷大的Excel上私自加上，但未经原作者同意，不敢私自公开。（涉及到LicenseKey）的问题。所以仅提供 ...

高手能否把licensekey删掉后把文件共享出来学习学习？

bash

NC@jiang@nan 发表于 2017-8-1 19:34
. C* ?8 e- Q' a% K& S) @+ m' b) g高手能否把licensekey删掉后把文件共享出来学习学习？

您好高手，已更新！

dsaxingyuner

好东西，值得拥有，谢谢楼主

mdj18

显示：若要在64位系统上使用，则必须更新此项目中的代码。。。

sihouko

大人發宏的帖子每次都下載，但是每次都不能用。。
vba裏面很多應該是中文的注解和引用，但是在他囯系統裏全都不可讀。。（VBA至今都不默認支持u8的嗎？）

6 A) }6 [% N5 t8 a- U- a5 z這次打開沒有error，但是選擇文件以後什麽都沒有了。。
0 N! D4 ^9 d4 I5 \( ~; c1 q# A8 `列表也沒有更新。。。手動輸入，選擇顯示預覽也是一閃之後就什麽都沒有了。。

bash

sihouko 发表于 2017-8-2 15:15
) C3 W" K. Q7 p$ s大人發宏的帖子每次都下載，但是每次都不能用。。
6 q0 x/ _* ], V: E( R1 evba裏面很多應該是中文的注解和引用，但是在他囯系統裏 ...

& e3 B: K! B8 ysihouko 大，您好，关于那所缩略图Excel问题。
3 H6 z' E' W( s1 I2 H里面有使用说明的文本。
1 H" [4 T" R7 \" Q4 T/ |如果乱码您看不到，那请往下看：
4 g- W0 C7 X2 B8 M1 ~& ~) \3 Y' r9 e, ^使用前请先确保LicenseKey有效，引用版本正确，及tempMacro_docGetThumbNail.swp放到位。

附件Excel仅在 简体：Win10 x64 + SW2017  , 日文：Win7 x64 + SW2017 ，测试通过。
-----------------
) Q; ^; @  B+ e8 ^% W1.开启预览图功能，请把tempMacro_docGetThumbNail.swp剪切到D:\
! z5 h0 L& _, q; h' [
/ m- D6 b1 X  ^" B: o如果要放到其他地方或者改变其名字，请修改相应修改Excel里面的"C1"单元格的内容！
( ]% B- }" M- A+ L0 K9 c
& W9 c. w1 \; i- ]0 U) Q2.更换DMLicenseKey,并且在VBA里面勾选相应SW版本的引用(目前状态是SW2017 SP3的引用)。

  Z( I6 V- h) h3 ?2 j. q) P3.声明，Excel的原始版本在网上所得，并经过一些“个性化”修改，并追加了预览图功能而已！
-----------------
若有其他问题，请加好友私聊！谢谢大大！
) k' T4 t" {7 u$ Z$ d
, Q" C4 o* Y; K# G* v; j6 O+ {: |
$ ~  T+ H, C) R- W2 L: U$ y2 X
/ J) r/ v# E- [: h. J! g

sihouko

6 K  z1 Y4 v) F- I0 G
重新申請lic后問題解決，感謝。

NC@jiang@nan

bash 发表于 2017-8-2 10:22
您好高手，已更新！

谢谢无私分享。
下载学习下，但一打开文件就报如图的错误，不知道是何原因？您这宏对我而言实在过于复杂，连排除都不知道怎么排除了，让高人见笑了。

sihouko

NC@jiang@nan 发表于 2017-8-2 20:32
' I" ~7 H4 L9 W' X; _. ]谢谢无私分享。
6 P$ ]4 n# h# F$ X: m下载学习下，但一打开文件就报如图的错误，不知道是何原因？您这宏对我而言实在过于复杂 ...

64b的處理方法和32b有點不一樣。
& l. G8 d2 d! f, s  ?8 P2 Q2 G/ g最簡單的方法是。。。裝回office的32b。。
一勞永逸的方法是，在寫一段64b的代碼，然後用if來判斷32b和64b分別執行。
8 e+ G+ K3 k' T: Y7 V只修改為64b用的話，32b會出現error。。
# ~* f  v  S  |- ?8 o
本機沒有64b，沒辦法幫忙測試，大人可以試一下把 As Long 改成As LongPtr 看是否可以運作。
2 N! q  Y0 V* d8 e" _

NC@jiang@nan

sihouko 发表于 2017-8-3 08:20
64b的處理方法和32b有點不一樣。
' y- P4 ]9 ~! K0 Q' C* T! ~最簡單的方法是。。。裝回office的32b。。
一勞永逸的方法是，在寫一 ...

% ]6 C* @- e, o' f回高手，因为我是64位的操作系统，所以装的64位的OFFICE。装32位的怕出现兼容性问题。
试了下，把 As Long 改成As LongPtr也还是一样的报错的。

ziliangmo

报错，对象不支持该属性和方法，请楼主解决

huang452581492

谢谢无私分享

litao036

看看怎么样 下载了

RJP3208

谢谢分享，学学！

tianlifang88

下载了，不知咋用。