查看完整版本: 請問如何用VBA EXCEL做股票回溯測試

論壇 › Visual Basic 語言 › 請問如何用VBA EXCEL做股票回溯測試

sft5120 發表於 2015-1-8 10:22 PM

請問如何用VBA EXCEL做股票回溯測試

請問各位大大
如何用在EXCEL用VBA做股票回溯測試
這是之前小弟找到的程式碼，但拿用之後卻一直顯示
"此處需要物件"的錯誤訊息
程式碼附上:
Private Sub CommandButton1_Click()

    Dim TimePeriod, TimeSpan As Integer
    Dim UpBound, LowBound As Single
    Dim i, j As Integer
        TimePeriod = Val(TextBook1.Text) '   //出現錯誤的位置
        UpBound = Val(TextBook2.Text) '
        LowBound = Val(TextBook3.Text) '
        TimeSpan = Val(TextBook4.Text) '
    For i = 4 To 8
        For j = 2 To 326
            Cells(j, i) = ""
        Next j
        Next i
        Cells(TimePeriod, 6) = 2 '一開始無買賣行動
        Cells(TimePeriod, 7) = 0 '一開始無股票部位
        Cells(TimePeriod, 8) = 1 '一開始無現金部位
    For i = 2 To TimeSpan
        If (Cells(i, 3) >...<div class='locked'><em>瀏覽完整內容，請先 <a href='member.php?mod=register'>註冊</a> 或 <a href='javascript:;' onclick="lsSubmit()">登入會員</a></em></div><div></div>

sft5120 發表於 2015-9-6 10:03 PM

如何用在EXCEL用VBA做股票回溯測試
這是之前小弟找到的程式碼，但拿用之後卻一直顯示
"此處需要物件"的錯誤訊息

rr09192084 發表於 2015-9-13 12:27 PM

你有在EXCEL裡的VBA設計界面裡，建立一個"自訂表單"，裡面要有CommandButton1，TextBook1，TextBook2，TextBook3，TextBook4，TextBox5等，這些在你的程式碼裡可以看到的物件嗎？
(注意喔！TextBox這個物件(元件)，第1個到第4個它們都命名為TextBook1-4，不是預設值TextBox1-4，只有第5個是用預設值TextBox5，你要會自行修改元件名稱，或是修改程式碼)