请问公式中有可以写文件的函数吗？

边缘_Michael · 发表于 2014-2-15 14:08:20

计算公式时希望导出一些结算结果，以便用excel统计。

不知道现有公式函数里，有没有可以写文件的函数呢？
预先谢谢大牛们回答。

gc007 · 发表于 2014-2-16 11:00:07

是同时计算公式的时候，输出数据到EXCEL吗？

边缘_Michael · 发表于 2014-2-16 22:37:36

gc007 发表于 2014-2-16 11:00* b% Z9 j, J+ K( y& @" @8 p! L( T
是同时计算公式的时候，输出数据到EXCEL吗？

是的，就是这个意思。输出格式能灵活些更好。

mccs · 发表于 2014-2-17 00:45:04

同问，请版主大人指教

醉心 · 发表于 2014-2-17 11:36:35

用VB来写看看

! o8 Z* P3 X9 { K+ ^" q: ^$ u: K
: [1 x1 g" r4 Q6 D$ w2 Q! `, Q
if DATAPERIOD<>0 then 9 `9 X. |) b3 x- t4 o
begin4 s, G: c, D3 w' K* r2 ~
DRAWTEXT(BARPOS=SYSPARAM(2)+10,1,'本指标只能用于分笔分析');% R% e' Z5 |* ` H& ?1 _4 R3 P
exit;
2 n% \+ B- K5 Y, o0 `
end;7 G( D4 D2 z- [; N% [
- O a$ c E/ f* n: A9 p4 v% ~
dd:=date;
* i( \( r2 B, M. O7 ^) \
4 r/ L! {3 W4 W- T2 f0 @' R& S
str:=NUMTOSTR(time,0)+';'+NUMTOSTR(v,0)+';'+NUMTOSTR(c,2);5 |4 P3 R# ]$ x2 K& w& q: Z1 A; _
for i=25 to 36 do: K' l! C. D" U; m' F1 U6 K+ ]
begin% N8 `- {! G+ g, M- e i
str:=str+';'+NUMTOSTR(DYNAINFO(i),2);
/ B0 k& c: g2 }) l. Q
end;
s, \4 u& p/ T+ T- w
$ j" l( J( }6 m) ~
<%
. r0 J7 p2 a4 I' t
vd1 = FFL.VarData("dd")4 |8 x( E/ r% n
vd2 = FFL.VarData("str")% [) `5 m9 `1 g' B A
nFirst = FFL.VarStartIndex("dd")
. C% M9 p9 c' h# j+ o/ m
& ]: P \4 @3 W; H) Z0 p' e' Z# k4 [- `
Set fso=CreateObject("Scripting.FileSystemObject")
7 _1 ~1 \& c8 j a; H$ }( B
fn ="D:/fhdata/"+cstr(vd1(nFirst))+"data.txt"# n$ o. I3 }7 R6 l1 T% O! B
& u R7 k+ C3 Y4 j p+ s" a# g( @
Set f1 = fso.OpenTextFile(fn,8,True)) ?. {. A; o9 q) H+ _
f1.writeline vd2
1 A: F# H+ _4 |9 G' S
f1.close
0 c5 t- z+ A6 F! ~
2 `& R, f! ] f1 S1 c
%>* ^# D( O4 {* ? q4 l4 ~
6 |- d7 T, e& Z. N
aa:time;
' k+ Z+ C5 l" s; h9 \' M) \* g
Show File Failed9 j) F3 g/ M( Y# \7 W0 f8 y! \! p
, O. _: z! L- z: Y4 ?
; @2 l2 P4 j I

复制代码

边缘_Michael · 发表于 2014-2-17 21:35:39

醉心发表于 2014-2-17 11:36) l; p8 [7 |* l9 `5 O' M
用VB来写看看

对VB不太熟，先学习着

sxsongchen · 发表于 2014-2-18 17:20:14

学习了，试试

边缘_Michael · 发表于 2014-3-2 21:41:15

醉心发表于 2014-2-17 11:367 m A$ o3 s/ G
用VB来写看看

哈哈，测试成功了！谢谢！

公式里面的vb是不是调用的windows自带的vb scripts引擎，window有的，公式里都能用吧？

		自动登录	找回密码
密码			手机注册

[步步汇盈] 请问公式中有可以写文件的函数吗？