|
发表于 2023-12-7 13:14:23
|
显示全部楼层
! `7 s/ h$ G* Y6 O# N- t% O$ _; M$ }目的是把当前文件直接改名到"物料描述"4 F; a0 L3 j: O. a! c, \
' h9 H- h- F; p7 A% U+ z
! O% @3 }% R S3 n" K) Q这个没办法直接实现的,可以换个方法代替。* ~$ w' N; G( e1 W# e
8 U0 Z8 E% [ O# o- h4 S* w
利用新名称另存文件,然后再在使用此文件的地方执行替换。! v% R8 ~/ b- R
; `/ I; w7 D" V& _/ s. K
( D" z3 k& K1 ^1 p0 ~9 _- j如果这样可行的话:4 _1 p# E2 q' G8 i: I9 b. E- P5 N
sFileName = iProperties.Value("Custom", "物料描述") & ".ipt"
3 E4 d& P# q) C; u' {2 b* N- Y; y0 ^5 y0 t& w! i# J) y- K7 }% w
sFileDirectory = ThisDoc.WorkspacePath() & "\"
0 S' O4 U# C; b- f6 XThisDoc.Document.SaveAs(sFileDirectory & sFileName, True)
5 P6 |! I3 C { |
|