返回列表 上一主題 發帖

[發問] (已解決)股市買賣點可以用字典做嗎

[發問] (已解決)股市買賣點可以用字典做嗎

本帖最後由 freeffly 於 2012-5-25 16:29 編輯

S欄市收盤價>10均且>20均得出的結果
T欄則是上面的相反
我本來是想直接抓出U欄的資料(第一個符合的資料及最後一個)
但是我不知道在VBA中是否有方法直接抓出來
做出U欄的資料我想做出W2:Y2這樣的資料
就是算出每一次符合的情況下的差異
不知道這個有辦法寫出來嗎
最近在學字典不過還在接觸當中還沒一個想法
請高手協助


100000.rar (473.87 KB)
字典兩各字 還真難理解

回復 2# register313


    大大redim後面就看不太懂
   雖然有試著去跑結果但不知道為什麼可以那樣出結果
   這邊可能我還要再研究

   大大的方式是用我弄出來的結果去跑U還有W:Y欄
   請問可以不先跑S欄直接讓S欄的結果等於U欄嗎?
字典兩各字 還真難理解

TOP

回復 3# Hsieh
版主附上原始公式
剛看一下結果還是跟我弄得一樣
是我公式有錯嗎
剛看公式應該是跟你的一樣

   

100000.rar (559.76 KB)
字典兩各字 還真難理解

TOP

回復 7# register313


    大大沒錯
   剛剛試了你的新代碼跑很久
   也許只能用輔助欄了
字典兩各字 還真難理解

TOP

回復 3# Hsieh


    版主
   我的條件是收盤>10均  10均>20均 10均>0 20均>0
    你的應該是收盤>10均  收盤>20均 10均>0 20均>0
    暫且不論哪一種比較好
   我想知道的是怎樣取出條件起始跟結尾值
字典兩各字 還真難理解

TOP

回復 10# Hsieh


    版主
   這是我要的
   而且不用經過S欄
   字典果然很快
    不過下面對我而言有點玄
    f = IIf(d.Count > 0 And d.Count Mod 2 > 0, "=RC[-1]-R[-1]C[-1]", "")
      d(Ar(i, 1)) = Array(Ar(i, 1), Ar(i, 5), f)
      .[W2].Resize(d.Count, 3) = Application.Transpose(Application.Transpose(d.items))

    看暸幾天的字典 我以為有點理解字典現在又感覺離我更遙遠
   我以為d.count 是去計算專案數 應該要先有東西讓他算吧?
   d.items在這裡是什麼項目?
   可以從哪裡看到嗎?
字典兩各字 還真難理解

TOP

回復 12# Hsieh


    版主講的好詳細
   讓我有些理解
   我想我可能要透過很多例子才能自己運用
   
   雖然字典不是唯一方法
   但是字典很炫
   而且速度很快
   讓我想要學習
   
   再來爬文...
    路途還真遙遠
字典兩各字 還真難理解

TOP

回復 14# jsleee


    免費交易軟體裡面的資料
字典兩各字 還真難理解

TOP

        靜思自在 : 一句溫暖的話,就像往別人身上灑香水,自己會沾到兩三滴。
返回列表 上一主題