|
9#
發(fā)表于 2023-12-7 13:14:23
|
只看該作者
5 j9 [5 U* Y7 j3 i目的是把當前文件直接改名到"物料描述"
3 n; C6 x, E0 X# h. K, I1 W0 ]; t6 E; ?/ J6 S8 ~8 t1 J
. i! g- {1 F; p# l2 G
這個沒辦法直接實現(xiàn)的,可以換個方法代替。
" B; t) Z, \" D4 [8 L0 j! z
' G {0 B9 M2 R& Y/ f8 c利用新名稱另存文件,然后再在使用此文件的地方執(zhí)行替換。
* I/ q! V/ V! f1 I6 B( N7 O7 c* U7 c, X2 |7 k( a c
8 f" Z- [; W- K7 ]
如果這樣可行的話:2 M t% Y% \! @. q) [5 R; `
sFileName = iProperties.Value("Custom", "物料描述") & ".ipt"; x. a$ a% D2 g6 ~7 ]& y
/ D+ @& E5 {; _) }4 m9 K) g" \
sFileDirectory = ThisDoc.WorkspacePath() & "\"
. [8 ]- a, A( F* g" t2 jThisDoc.Document.SaveAs(sFileDirectory & sFileName, True), S8 N/ V5 U, _2 B/ y; b
|
|