麻辣家族討論版版 » Excel程式區 » 請問此功能有其他的方式解決嗎?

返回列表下一主題上一主題發帖

請問此功能有其他的方式解決嗎?

中學生 Rank: 2

帖子: 365
主題: 40
精華: 0
積分: 406
點名: 0
作業系統: Win 7
軟體版本: OFFICE 2003
閱讀權限: 20
註冊時間: 2012-12-11
最後登錄: 2024-8-24

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2024-1-2 21:32 | 顯示全部帖子

請問此功能有其他的方式解決嗎?

本帖最後由藍天麗池於 2024-1-2 21:33 編輯

請教版上前輩，我目前有個VBA用來記錄期貨數據，其功能為成交量有變動就紀錄，然後我去做計算，目前是用成交量有變動就紀錄的方式去寫，但期貨的跳動速度很快(有時候1秒會寫入6-8筆的資料)，從開盤到收盤會寫入大量的資料

   目前我的VBA的運作如下(A1的值是券商DDE得來的，大概就如同我附件那樣)
   A1 10
   A2 15    B2 = A2-A1 =5
   A3 18    B3 = A3-A2 =3
   A4 20                .
   A5 25                .
         .                      .
         .                      .
      依次下去    依次下去

因為我抓的資料不少所以資料有點大，目前是先將資料都先記錄下來，再求差，導致運算速度變慢，所以想請教版上前輩，我上述的需求如果不用變動寫入的方式去求差，有其他的解決方式嗎?

變動紀錄.rar (17.49 KB)

樓主熱帖

收藏

中學生 Rank: 2

帖子: 365
主題: 40
精華: 0
積分: 406
點名: 0
作業系統: Win 7
軟體版本: OFFICE 2003
閱讀權限: 20
註冊時間: 2012-12-11
最後登錄: 2024-8-24

2^#

發表於 2024-1-3 20:40 | 顯示全部帖子

回復 2# Andy2483
主要就是不要用紀錄的方式求差值，想了解有無其他方式

隨時間推進B、C欄會有值一直寫進去，然後再求B3-B2、B4-B3......一直下去

詳細說就是假設B2在84500(時間)的值是252，84501的值是300，我想要求差值300-252，但不想用紀錄的方式求差值要如何做呢?

中學生 Rank: 2

帖子: 365
主題: 40
精華: 0
積分: 406
點名: 0
作業系統: Win 7
軟體版本: OFFICE 2003
閱讀權限: 20
註冊時間: 2012-12-11
最後登錄: 2024-8-24

3^#

發表於 2024-1-4 14:49 | 顯示全部帖子

回復 6# hcm19522

請教前輩這是用函數的方式來解？能幫我解釋一下嗎？有點看不懂，感謝

中學生 Rank: 2

帖子: 365
主題: 40
精華: 0
積分: 406
點名: 0
作業系統: Win 7
軟體版本: OFFICE 2003
閱讀權限: 20
註冊時間: 2012-12-11
最後登錄: 2024-8-24

4^#

發表於 2024-1-4 14:50 | 顯示全部帖子

回復 5# Andy2483
我回家試試看，再跟你說結果

中學生 Rank: 2

帖子: 365
主題: 40
精華: 0
積分: 406
點名: 0
作業系統: Win 7
軟體版本: OFFICE 2003
閱讀權限: 20
註冊時間: 2012-12-11
最後登錄: 2024-8-24

5^#

發表於 2024-1-4 20:24 | 顯示全部帖子

本帖最後由藍天麗池於 2024-1-4 20:29 編輯

回復 5# Andy2483

Andy，感謝你的回覆，但你好像誤解我的意思了，你以下的程式碼還是需要把總委賣跟總委賣往下寫才能去相減得出差，這樣如果我有20個總委買賣的資料就會有40欄，資料量會很大
[F2] = [B2] - Cells(Rows.Count, 2).End(3)
[G2] = [C2] - Cells(Rows.Count, 3).End(3)

我要的結果是我往下寫的值只留差值，如同我在附件幫你標示的樣子

變動紀錄(差別).rar (19.58 KB)

中學生 Rank: 2

帖子: 365
主題: 40
精華: 0
積分: 406
點名: 0
作業系統: Win 7
軟體版本: OFFICE 2003
閱讀權限: 20
註冊時間: 2012-12-11
最後登錄: 2024-8-24

6^#

發表於 2024-1-5 09:12 | 顯示全部帖子

回復 11# singo1232001

前輩感謝你，但跟我的需求好像不太一樣，且我對access也不太熟，感謝回復

中學生 Rank: 2

帖子: 365
主題: 40
精華: 0
積分: 406
點名: 0
作業系統: Win 7
軟體版本: OFFICE 2003
閱讀權限: 20
註冊時間: 2012-12-11
最後登錄: 2024-8-24

7^#

發表於 2024-1-5 13:40 | 顯示全部帖子

回復 15# singo1232001

前輩感謝，用EXCEL+ACCESS的方式我不熟，所以就先不考慮了

中學生 Rank: 2

帖子: 365
主題: 40
精華: 0
積分: 406
點名: 0
作業系統: Win 7
軟體版本: OFFICE 2003
閱讀權限: 20
註冊時間: 2012-12-11
最後登錄: 2024-8-24

8^#

發表於 2024-1-5 13:47 | 顯示全部帖子

本帖最後由藍天麗池於 2024-1-5 13:51 編輯

回復 14# hcm19522

前輩感謝回復，可是前輩好像誤會我的意思了，看你的函數好像也是要將數值記錄下來才能去做運算得差值

我想問的是有無不將值紀錄然後直接得差值的方法，結果大約像我附件那樣

變動紀錄(差別).rar (19.58 KB)

中學生 Rank: 2

帖子: 365
主題: 40
精華: 0
積分: 406
點名: 0
作業系統: Win 7
軟體版本: OFFICE 2003
閱讀權限: 20
註冊時間: 2012-12-11
最後登錄: 2024-8-24

9^#

發表於 2024-1-5 16:52 | 顯示全部帖子

回復 18# Andy2483

可是如果差值的數據要再做運算也是要多拆一欄出來做資料的處理

中學生 Rank: 2

帖子: 365
主題: 40
精華: 0
積分: 406
點名: 0
作業系統: Win 7
軟體版本: OFFICE 2003
閱讀權限: 20
註冊時間: 2012-12-11
最後登錄: 2024-8-24

10^#

發表於 2024-1-5 21:09 | 顯示全部帖子

回復 20# Andy2483

可是假設我要後面的差去做運算，也是要拆一欄放數據才能做運算

靜思自在 : 口說好話、心想好意、身行好事。

返回列表下一主題上一主題