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

边缘_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
$ d/ G' M6 k: u/ }0 w是同时计算公式的时候，输出数据到EXCEL吗？

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

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

同问，请版主大人指教

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

用VB来写看看

* J! C# w. y* I" h2 Q
' Y* w. w8 Y: I2 ]
if DATAPERIOD<>0 then 6 G& t( l" h5 r: M4 I
begin
# A) Q5 V6 Z4 L5 b, J
DRAWTEXT(BARPOS=SYSPARAM(2)+10,1,'本指标只能用于分笔分析');6 h' d; a+ Z0 I8 t
exit;' o9 E3 _" M; I6 t- |* g$ R9 U( |
end;
8 y! G |1 K [' m9 U2 d8 A
% d: y9 D9 E. {$ ?
dd:=date;
8 N- ?) W' s2 p: N1 |/ F4 A
6 l% k# B* F4 ^
str:=NUMTOSTR(time,0)+';'+NUMTOSTR(v,0)+';'+NUMTOSTR(c,2);9 s5 ~ \" l' S u; C1 ]& ]8 x
for i=25 to 36 do
U! z/ H9 d- ^) K' s
begin; }/ J' j& w% X/ H3 U
str:=str+';'+NUMTOSTR(DYNAINFO(i),2);
8 C) [7 |: @- N# L8 g
end;, e9 M3 Y( M1 V; ?
6 r% O1 e) X, [3 G# A" r
<%
; S( g$ }) t! Q# B" R
vd1 = FFL.VarData("dd")
4 s% v$ [0 j3 O' Y
vd2 = FFL.VarData("str")
7 |; M1 [! v$ r* S1 g5 w) f2 n8 i, Z8 Z
nFirst = FFL.VarStartIndex("dd") * E2 f6 ?! T$ M" l5 W" B8 D7 W
$ w* K" T6 Z" G9 v8 z3 n F! p
Set fso=CreateObject("Scripting.FileSystemObject") t6 F4 H' d( N5 |0 ~
fn ="D:/fhdata/"+cstr(vd1(nFirst))+"data.txt"5 V) T; p+ N3 k$ U- e+ Q& y" m
; X$ X7 N1 r% ^) M1 @' @% Z7 W
Set f1 = fso.OpenTextFile(fn,8,True)
6 [6 }' |" `4 B! H/ U
f1.writeline vd2
5 b/ R) W+ ^) n. O) R6 d8 J% n
f1.close; G9 f; x6 n. ^: V* }# V1 {7 U
t0 }3 j2 v6 p5 F2 E7 J8 |4 n
%>& r" f5 ^4 r7 ~- M6 A) m# F" N
/ ] t. ?# x7 @0 H' Z( ^' s
aa:time;
) J: j" P+ z9 v3 I* t! f0 U2 A+ a. f; i
Show File Failed6 ~% x7 {! [! e: \: y
; n6 r' |2 P2 x- z1 N" J( j
2 [5 u: [, |, O- N/ p7 t

复制代码

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

醉心发表于 2014-2-17 11:36
( B% [9 q: l- ^& F. R用VB来写看看

对VB不太熟，先学习着

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

学习了，试试

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

醉心发表于 2014-2-17 11:36! p& W4 T5 {/ N
用VB来写看看

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

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

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

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