VBS使用 [金字塔]
- 咨詢內(nèi)容:
Sub Test()
'該示例將把技術(shù)分析主圖上的MA指標(biāo)前兩條線輸出到EXCEL中,使用前請(qǐng)注意將K線主圖打開(kāi),并顯示MA指標(biāo)
' 得到框架名稱為"Technic",窗格名稱為"Main"的窗格對(duì)象
Set Grid = Technic.GetGridByName("Main")
Set Formula = Grid.GetFormulaByIndex(1)
'創(chuàng)建EXCEL對(duì)象
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
objExcel.Workbooks.Add
'循環(huán)遍歷得到公式線
for i = 0 to Formula.DataSize-1
'將兩條數(shù)據(jù)線插入到EXCEL第一、二列
objExcel.Cells(i+1,1).Value =Formula.GetBufData("MA1",i)
next
End Sub這個(gè)應(yīng)該怎么樣?大蝦指導(dǎo)指導(dǎo)!不勝感激!
- 金字塔客服:
這個(gè)應(yīng)該怎么使用,謝謝?大蝦指導(dǎo)指導(dǎo)!不勝感激!
- 用戶回復(fù):
你去弄個(gè)vba編一編就明白了,vba里面excel workbook worksheet的對(duì)象是分開(kāi)的
objExcel只是一個(gè)excel對(duì)象而已,只有worksheet對(duì)象里面才有cells
(曾祖父是不能生出曾孫的,別直接跳幾級(jí))
另外建立新的workbook時(shí),會(huì)自動(dòng)默認(rèn)至少有一張worksheet的,你可以用worksheets(1)讀取
worksheets(1).Cells(i+1,1).Value =Formula.GetBufData("MA1",i)
才有用
- 網(wǎng)友回復(fù):
另外,由于workbook worksheet還涉及到一個(gè)激活的問(wèn)題
最好養(yǎng)成良好習(xí)慣,把已經(jīng)激活的worksheet做一個(gè)對(duì)象鏈接
后面用對(duì)象鏈接就好
- 網(wǎng)友回復(fù): 謝謝!已經(jīng)弄好
相關(guān)文章
-
沒(méi)有相關(guān)內(nèi)容