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

边缘_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:004 e" E1 z6 w: l) U$ D
是同时计算公式的时候，输出数据到EXCEL吗？

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

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

同问，请版主大人指教

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

用VB来写看看

9 ~3 X+ w* B( U$ E; [% f
" p% s# k j3 Y Z& k$ o
if DATAPERIOD<>0 then
, L0 u1 [( z' F# c N
begin, Q* G8 |9 d" g' f2 ]5 [' L) @
DRAWTEXT(BARPOS=SYSPARAM(2)+10,1,'本指标只能用于分笔分析');8 q" o. h; x1 s( Z i4 B% Z3 ]
exit;
6 X4 b5 r2 J1 P8 c$ i6 Z0 U
end;1 c. u6 _( K6 [% E1 ?
4 P1 }$ z7 v7 [& g
dd:=date;/ q [8 b0 h: M, V* _, t
/ I, l6 j/ ^9 Y
str:=NUMTOSTR(time,0)+';'+NUMTOSTR(v,0)+';'+NUMTOSTR(c,2);4 v2 } E4 w& T* O4 C9 T' c1 _
for i=25 to 36 do6 {4 v! t5 e6 N q
begin3 |0 L+ s" S$ e7 w' D
str:=str+';'+NUMTOSTR(DYNAINFO(i),2);
' s- e. W. z0 P; a4 I
end; B3 ~" U) ]. }& u8 b
7 m$ r1 M+ [, e6 C: @; c3 t" u9 c
<%. {% W$ q' Q C, q6 A8 n% y1 z
vd1 = FFL.VarData("dd")! @" o; ?4 r' A: B+ [' E, q
vd2 = FFL.VarData("str")
' @# g9 W( F% E7 \& F, {. {) t
nFirst = FFL.VarStartIndex("dd")
& p8 x3 V* I! e
) q2 ]+ S$ S9 x, d c; j( o5 a+ `5 F
Set fso=CreateObject("Scripting.FileSystemObject")( U8 q0 m8 F. o
fn ="D:/fhdata/"+cstr(vd1(nFirst))+"data.txt"4 C+ D6 ~3 Y J: j( o: e
# L1 ~. P+ R& g4 q. }
Set f1 = fso.OpenTextFile(fn,8,True)
5 k+ [0 t( T% C5 n! N
f1.writeline vd22 p$ p6 y+ L* L, h& p% |
f1.close& M" V+ u9 \6 R) t+ I$ ?6 P
; O' d" B0 Y: c; n6 f6 K. u
%>
+ R* }* b4 d4 @& D0 ]4 u. K( V
+ O& T. @2 z2 I/ v! q0 b( B6 @6 d0 F' b
aa:time;
. n& m. L. ^6 W$ b' c( L
Show File Failed
! S* }. V- c( _% _7 X) M
, p9 d- M" _; f' Y( A( W0 P3 z
8 d3 a3 s* _3 g

复制代码

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

醉心发表于 2014-2-17 11:36- A3 K% k7 }8 |- ?. r. E' o' F
用VB来写看看

对VB不太熟，先学习着

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

学习了，试试

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

醉心发表于 2014-2-17 11:36" w- U8 H7 P* \, T+ p* w' c7 f
用VB来写看看

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

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

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

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