返回列表 上一主題 發帖

[發問] 大家好 , 請教關於DDE自動換行與一些問題

[發問] 大家好 , 請教關於DDE自動換行與一些問題

大家好 , 小妹因工作需要剛開始學習 Excel :P
參考了 這篇 後做出了大概想達成的需求 (調了好久 ><)
但又碰上一些問題
這邊附上圖懇請 c_c_lai 大幫忙 ><


另外還有幾個問題冒昧請教大大們 ~
台股的大盤不是有分電子、金融跟傳產嗎?
那我要把它們的成交比重抓到 Excel 應該怎麼抓 , 我老闆是用群益超級贏家這套
要抓出來像
電子 60%
金融 20%
傳產 10% 這樣 ><

然後就是如果說我想要抓 B,2 這欄的 "從開盤到目前的最高值與最低值"
應該要怎麼寫呢 ? ><

抱歉 ~ 問題有點多 >< 還請各位大大幫幫小妹了 :'(
小妹在此向各位大大求教了 Orz

c_c_lai 大請查收 :)
範例加目前結果.rar (186.47 KB)
感謝 :'(
小妹在此向各位大大求教了 Orz

TOP

回復 4# c_c_lai

c_c_lai 大抱歉 >"<
以後會記得用回覆按鈕的
我記錄的時間一樣是五分鐘一次呀
第二行~是的就是前一筆資料下移
關於需求就是 :
以 E4 為例
E4 = B4 - B3
F4 = C4 - C3
G4 = D4 - D3
E5 = B5 - B4

但因為以原換行程式來跑它是把 A2~J2
每隔5分往下一行記錄
問題是在一開始時 E2 F2 跟 G2 是沒辦法有資料的 (因為 B C D 的第二行沒辦法減第一行 , 第一行是中文 , 而 E F G 的第三行因為一開始第二行沒資料也沒辦法去減它)
所以 E F G 往下就會一直是空白

不知道這樣解釋夠不夠清楚 ><
感謝 :Q
小妹在此向各位大大求教了 Orz

TOP

回復 7# c_c_lai


是的 ~ 就是當前減上一個 ><
小妹在此向各位大大求教了 Orz

TOP

回復 6# GBKEE


    感謝 GB 大
小妹現在來試試看 >"<
小妹在此向各位大大求教了 Orz

TOP

回復 8# saleen


    這邊說的有點不清楚 ><
應該是說上一筆的記錄減去上上一筆的記錄
問題就在第一筆是沒有上一筆的所以沒辦法算出
小妹在此向各位大大求教了 Orz

TOP

回復 6# GBKEE


哇 ~ 感謝 GBKK 超級版主 >~<
可以用了..超強的 ^"^
不過不知道為什麼這份 Excel 速度變得很慢(開啟關閉儲存都變很慢,新增一行時也變慢)
太厲害了! :D
小妹在此向各位大大求教了 Orz

TOP

回復 12# c_c_lai

^^~感謝 c_c_lai 大大 !
我現在馬上去試試看 ~~
不過不知道我只是要把表格上色為什麼就跑出下拉選單來了
只好想辦法把它拿掉 ><
小妹在此向各位大大求教了 Orz

TOP

回復 12# c_c_lai


太強了 ! 感謝 c_c_lai 大大 >~~<
超級成功耶 !
雖然看不太懂      
Rng(5) = "=IF(ISNUMBER(R[1]C[-3]),RC[-3]-R[1]C[-3],0)"
Rng(6) = "=IF(ISNUMBER(R[1]C[-3]),RC[-3]-R[1]C[-3],0)"
Rng(7) = "=IF(ISNUMBER(R[1]C[-3]),RC[-3]-R[1]C[-3],0)"

這三行究竟是什麼意思 D:
都沒參照 rng 2 3 4 怎麼算出來差值的  囧
小妹在此向各位大大求教了 Orz

TOP

回復 15# c_c_lai


    哦哦 ! 原來如此 ! 是往前算三行的意思 !
請教 c_c_lai 大像這些程式碼要如何學習 ?
有專門整本都是程式碼的書推薦嗎 ?

另像是 .Range("A2:L2").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove 這段
我想把它改寫成 即時資料在最上面一行
然後每五分鐘由第三行起算往下加一行
我寫成  .Range("A3:L3").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
這樣對嗎 ?
因為現在這樣最新的即時資料會被擠到下面 ><
好像有點困難...
小妹在此向各位大大求教了 Orz

TOP

        靜思自在 : 愛不是要求對方,而是要由自身的付出。
返回列表 上一主題