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

边缘_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$ E* [1 T! {" x0 u! }' }; Y' v
是同时计算公式的时候，输出数据到EXCEL吗？

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

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

同问，请版主大人指教

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

用VB来写看看

5 z6 X3 i7 B" n. X
3 l; ^' C( N6 n" H
if DATAPERIOD<>0 then
+ i, H7 h! T9 Z# O" z
begin
& `. O( z$ C9 a W; w4 R3 `
DRAWTEXT(BARPOS=SYSPARAM(2)+10,1,'本指标只能用于分笔分析');
" x8 h% C( Z& U, e {% \- W0 R+ `
exit;
3 v) @ E: [$ x* U% A% Y0 x
end;
/ h; C# H/ ~ V N5 Q
! g5 A2 y8 ?+ J( e5 [' i
dd:=date;2 p9 d$ V' }& v, j/ S0 g6 n
* f' ]4 Z J8 y' g8 h7 l% l9 n
str:=NUMTOSTR(time,0)+';'+NUMTOSTR(v,0)+';'+NUMTOSTR(c,2);3 v) O) I- d2 C
for i=25 to 36 do
6 n5 p; V0 ?8 W' M9 O( k" W/ {
begin
' P" v9 D, I- T" x; |) N, i
str:=str+';'+NUMTOSTR(DYNAINFO(i),2);, F% i# Z1 G$ o
end;9 h3 b1 H2 F8 m
* y! Z1 E% _0 |1 F- b$ K) `' p4 f
<%/ \; |- B% w; L3 @ T
vd1 = FFL.VarData("dd")
) a( A3 S0 s# @
vd2 = FFL.VarData("str")! B' F: x3 ?- I0 _: R
nFirst = FFL.VarStartIndex("dd")
" t5 `1 G0 j* B- u5 T& \9 G
& F* n Z+ Y2 b6 O$ M) ^
Set fso=CreateObject("Scripting.FileSystemObject")
5 L( l+ b7 W0 G
fn ="D:/fhdata/"+cstr(vd1(nFirst))+"data.txt"
7 F- t$ |% T$ j
9 L& c# ?% z# X7 o- d4 N
Set f1 = fso.OpenTextFile(fn,8,True)! }' G6 G) G* l2 |4 d
f1.writeline vd29 y( o; R3 g1 Y" A2 l1 p
f1.close
( }; N( Q! [0 y5 \ M5 R& Q
6 K; [3 ~4 Q# Z9 h/ T/ @; u
%>
: w% f+ I6 X; P& {, T
" A! \3 J4 |2 W1 `9 J' S
aa:time;
) U5 u) S! G; }0 W z
Show File Failed+ V0 ]9 N" n0 F; f3 C) b
7 N% \# [/ v0 v$ d. j( c3 m
' k g- @ N8 D8 o3 W

复制代码

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

醉心发表于 2014-2-17 11:36
/ B# Y2 R8 j$ V- A% T用VB来写看看

对VB不太熟，先学习着

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

学习了，试试

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

醉心发表于 2014-2-17 11:362 M# G' A: I" x* k% d7 f
用VB来写看看

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

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

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

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