Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[求助]如何用VBA读取xls文件引用到附图指标?

1楼
ch3coohqb 发表于:2016/5/5 16:49:29
我需要使用一些基本面的数据~
这些数据都是导出到xls文件~需要手动变成mdb文件
再用金字塔调用
由于量太大操作困难

是否有办法用金字塔直接调用xls??
也就是说把基本面数据变成一个附图指标使用~

有人说可以用vba读取xls~我就问一下是否有范例~
vba读取xls变成金字塔的一个附图指标
2楼
王锋 发表于:2016/5/5 17:02:45
你在高级区用Excel做关键字能搜出来一堆
3楼
pel46585 发表于:2016/5/9 10:11:59

cc:=close;

IF NOT(ISLASTBAR) THEN EXIT;

<%
    Set obj = CreateObject("Scripting.FileSystemObject")
    Set OFile = obj.OpenTextFile("D:\Program Files\Weisoft Stock\wpdsingle.csv", 1)
    xTxt = OFile.ReadAll
    OFile.Close
    Set obj = Nothing
    vcc=ffl.VarData("cc")
    fg = Split(xTxt, vbCrLf)
    xEnd = UBound(fg)
    For i = 1 To xEnd - 1
        fgg = Split(fg(i), "=")
        vcc(i-1) = Val(fgg(1))
    Next
    ffl.VarData("cc") = vcc
%>
vsp: cc;

例子用的csv格式文件,具体excel格式可以百度"vb excel"

这个例子是公式,新建一个公式就可以了。

可能上面的代码有错误的地方,只提供大约思路。

[此贴子已经被作者于2016/5/9 10:12:33编辑过]
共3 条记录, 每页显示 10 条, 页签: [1]


Powered By Dvbbs Version 8.3.0
Processed in 0.03125 s, 2 queries.