請教如何修改程式來提高執行效率呢? - Excel程式區

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

46^# 跳轉到 »

發表於 2024-1-19 11:59 | 只看該作者

回復 44# Andy2483

沒有錯誤，我一直點結束，數字會變動喔

　暱稱: 厚臉皮的學生

帖子: 1429
主題: 40
精華: 0
積分: 1453
點名: 0
作業系統: Windows 7
軟體版本: Excel 2010 & 2016
閱讀權限: 50
性別: 男
來自: 台灣
註冊時間: 2020-7-15
最後登錄: 2024-5-18

45^#

發表於 2024-1-19 11:58 | 只看該作者

回復 43# 藍天麗池

試一下以下執行結果
Sub TEST()
MsgBox Evaluate("=XQTISC|Quote!'FITXN*1.TF-BestBidSize1'")
End Sub

用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

　暱稱: 厚臉皮的學生

帖子: 1429
主題: 40
精華: 0
積分: 1453
點名: 0
作業系統: Windows 7
軟體版本: Excel 2010 & 2016
閱讀權限: 50
性別: 男
來自: 台灣
註冊時間: 2020-7-15
最後登錄: 2024-5-18

44^#

發表於 2024-1-19 11:56 | 只看該作者

回復 43# 藍天麗池

重新開啟檔案,現在是兩個DDE值VBA抓不到,請檢查一下這兩串字是不是有錯誤
=XQTISC|Quote!'FITXN*1.TF-FiveBidSize'
=XQTISC|Quote!'FITXN*1.TF-FiveAskSize'

用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

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

43^#

發表於 2024-1-19 11:52 | 只看該作者

回復 42# Andy2483

我剛剛又試了一下，這次連左邊A-D都不會顯示任何東西了，只會一直出現原本那個錯誤

　暱稱: 厚臉皮的學生

帖子: 1429
主題: 40
精華: 0
積分: 1453
點名: 0
作業系統: Windows 7
軟體版本: Excel 2010 & 2016
閱讀權限: 50
性別: 男
來自: 台灣
註冊時間: 2020-7-15
最後登錄: 2024-5-18

42^#

發表於 2024-1-19 11:46 | 只看該作者

本帖最後由 Andy2483 於 2024-1-19 11:49 編輯

回復 41# 藍天麗池

奇怪了這兩格植入公式可以顯示數字,VBA卻抓不到值
其他的DDE值VBA都抓到了,就這兩個值抓不到
請檢查一下原本這 L10與K10 這兩格的公式是否正確,貼上來看一下

用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

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

41^#

發表於 2024-1-19 11:36 | 只看該作者

回復 40# Andy2483

有，我有放職進去

　暱稱: 厚臉皮的學生

帖子: 1429
主題: 40
精華: 0
積分: 1453
點名: 0
作業系統: Windows 7
軟體版本: Excel 2010 & 2016
閱讀權限: 50
性別: 男
來自: 台灣
註冊時間: 2020-7-15
最後登錄: 2024-5-18

40^#

發表於 2024-1-19 11:32 | 只看該作者

回復 38# 藍天麗池

[K10] 和 [10] 儲存格有值嗎?

用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

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

39^#

發表於 2024-1-19 11:32 | 只看該作者

回復 37# Andy2483

左邊會有直出現，但是一樣會出現錯誤

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

38^#

發表於 2024-1-19 11:30 | 只看該作者

回復 37# Andy2483

一樣出現最早的那個錯誤

　暱稱: 厚臉皮的學生

帖子: 1429
主題: 40
精華: 0
積分: 1453
點名: 0
作業系統: Windows 7
軟體版本: Excel 2010 & 2016
閱讀權限: 50
性別: 男
來自: 台灣
註冊時間: 2020-7-15
最後登錄: 2024-5-18

37^#

發表於 2024-1-19 11:25 | 只看該作者

回復 36# 藍天麗池

原來
[K10]儲存格是 =XQTISC|Quote!'FITXN*1.TF-FiveBidSize'
[L10]儲存格是 =XQTISC|Quote!'FITXN*1.TF-FiveAskSize'
如果把這兩公式放入儲存格會有值嗎? 或錯誤值? 請試試看

用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流