|
|
发表于 2018-12-18 01:53:06
|
显示全部楼层
来自： 中国江苏南京
我有问题请教5 ^: B5 [$ K/ U* J/ e+ t
我想将文件的创建时间提取出来，不知道用什么属性提取。
/ k: V8 l N3 V- M! O5 J用"SW-Created Date"提取不出来。2 T$ W$ `0 i& G, h2 c7 n, S" A% s
* r T& T; b( Y" F- f# z- ^==================================================
( H7 V- C% h/ W. H. ^% X0 p4 w) T
" k, \* t" x% [8 {$ d'**************************************根据自己的实际需求进行增删**************************, Q; d; d& d/ M8 P
xlWs.Range("B" & CurRow).Value = Left(swDocName & MYext, 11) & Chr(10) & Mid(swDocName & MYext, 12)
- b. U& c- V l! o/ d7 `% k1 I '这样书写可实现自动换行.Chr(10)表示换行
4 v9 P5 q* s$ E& r2 }7 h " h& L. `& {. v- q- W% a* t, c
' xlWs.Range("C" & CurRow).Value = Get_Property_value(swDoc, "Description")
) s9 D- D7 h4 ]6 y- b0 H$ b xlWs.Range("C" & CurRow).Value = Get_Property_value(swDoc, "名称")# E$ J/ x: t7 a; K/ _' Y3 v7 }
xlWs.Range("D" & CurRow).Value = Get_Property_value(swDoc, "代号")
$ X" V3 j' @* l. r- @% `3 R9 q1 \' xlWs.Range("F" & CurRow).Value = Get_Property_value(swDoc, "Material")# a# X% c. d9 \( @" E8 X& d
xlWs.Range("F" & CurRow).Value = Get_Property_value(swDoc, "材料")
. F4 i5 h; t5 \3 B& J , s8 ~% y( E" T3 y3 w" |
xlWs.Range("G" & CurRow).Value = Get_Property_value(swDoc, "所属装配")
& G9 A: ]; m" c. ~0 S" e' xlWs.Range("H" & CurRow).Value = Get_Property_value(swDoc, "数量")/ F3 H m! g( u j' P: P
'对于数量列，按照中心对齐
( z' I: w q- U4 R With xlWs.Range("H" & CurRow)
; Y4 S2 v! ?5 @3 s8 b5 ^, l' A% R .Value = Get_Property_value(swDoc, "数量")
# N5 l; w2 |) `7 p$ N3 Z4 D .HorizontalAlignment = xlCenter6 n6 {, t% Z6 y7 I
End With
6 [1 u& q6 E3 A D
. A4 P: ]7 I. o0 s) O) c) c/ |# c' xlWs.Range("I" & CurRow).Value = Get_Property_value(swDoc,"Weight")
: V8 D# Z/ O4 E {9 F9 r xlWs.Range("I" & CurRow).Value = Get_Property_value(swDoc, "质量")
' i8 a# z+ i- ~( L% F9 { xlWs.Range("J" & CurRow).Value = Get_Property_value(swDoc, "创建日期") '重量
1 w. `$ e# U, z G( _6 `0 _5 S" N xlWs.Range("K" & CurRow).Value = Get_Property_value(swDoc, "SW-Created Date")) k/ U! [: W% U6 F/ L+ x l
$ x. Y8 T8 }" ]8 O* ~2 v- ]# v) U'*****************************************************************************************
* ]" t% W0 k/ r* W4 y g& l
6 |) k9 o8 A! B% q5 F* F====================================================
& f' o; E* |0 O4 ~+ J
. R% C+ E9 C6 E5 C; |# y
1 x% G0 |+ n# R8 m' M: c( |# D n8 o6 C
7 V d# H2 @: z' `0 D |
|
发表于 2018-5-23 17:54:07
