12345678
返回列表 上一主題 發帖

[發問] 請教如何修改程式來提高執行效率呢?

藍天麗池

帖子
365 
主題
40 
精華
0 
積分
406 
點名
0  
作業系統
Win 7 
軟體版本
OFFICE 2003 
閱讀權限
20 
註冊時間
2012-12-11 
最後登錄
2024-8-24 
46# 跳轉到 »
發表於 2024-1-19 11:59 | 只看該作者
回復 44# Andy2483


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

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
45#
發表於 2024-1-19 11:58 | 只看該作者
回復 43# 藍天麗池


    試一下以下 執行結果
Sub TEST()
MsgBox Evaluate("=XQTISC|Quote!'FITXN*1.TF-BestBidSize1'")
End Sub
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
44#
發表於 2024-1-19 11:56 | 只看該作者
回復 43# 藍天麗池


    重新開啟檔案,現在是兩個DDE值VBA抓不到,請檢查一下這兩串字  是不是有錯誤
=XQTISC|Quote!'FITXN*1.TF-FiveBidSize'
=XQTISC|Quote!'FITXN*1.TF-FiveAskSize'
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

藍天麗池

帖子
365 
主題
40 
精華
0 
積分
406 
點名
0  
作業系統
Win 7 
軟體版本
OFFICE 2003 
閱讀權限
20 
註冊時間
2012-12-11 
最後登錄
2024-8-24 
43#
發表於 2024-1-19 11:52 | 只看該作者
回復 42# Andy2483


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

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
42#
發表於 2024-1-19 11:46 | 只看該作者
本帖最後由 Andy2483 於 2024-1-19 11:49 編輯

回復 41# 藍天麗池


    奇怪了 這兩格植入公式可以顯示數字,VBA卻抓不到值
其他的DDE值VBA都抓到了,就這兩個值抓不到
請檢查一下原本這 L10與K10 這兩格的公式是否正確,貼上來看一下
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

藍天麗池

帖子
365 
主題
40 
精華
0 
積分
406 
點名
0  
作業系統
Win 7 
軟體版本
OFFICE 2003 
閱讀權限
20 
註冊時間
2012-12-11 
最後登錄
2024-8-24 
41#
發表於 2024-1-19 11:36 | 只看該作者
回復 40# Andy2483


    有，我有放職進去

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
40#
發表於 2024-1-19 11:32 | 只看該作者
回復 38# 藍天麗池


    [K10] 和 [10] 儲存格有值嗎?
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

藍天麗池

帖子
365 
主題
40 
精華
0 
積分
406 
點名
0  
作業系統
Win 7 
軟體版本
OFFICE 2003 
閱讀權限
20 
註冊時間
2012-12-11 
最後登錄
2024-8-24 
39#
發表於 2024-1-19 11:32 | 只看該作者
回復 37# Andy2483

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

TOP

藍天麗池

帖子
365 
主題
40 
精華
0 
積分
406 
點名
0  
作業系統
Win 7 
軟體版本
OFFICE 2003 
閱讀權限
20 
註冊時間
2012-12-11 
最後登錄
2024-8-24 
38#
發表於 2024-1-19 11:30 | 只看該作者
回復 37# Andy2483


   一樣出現最早的那個錯誤

TOP

Andy2483
　暱稱: 厚臉皮的學生

碩士班Rank: 5Rank: 5

帖子
1567 
主題
40 
精華
0 
積分
1591 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
100 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2026-2-2 
37#
發表於 2024-1-19 11:25 | 只看該作者
回復 36# 藍天麗池


    原來
[K10]儲存格是 =XQTISC|Quote!'FITXN*1.TF-FiveBidSize'
[L10]儲存格是 =XQTISC|Quote!'FITXN*1.TF-FiveAskSize'
如果把這兩公式放入儲存格會有值嗎? 或錯誤值? 請試試看
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

        靜思自在 : 人生最大的成就是從失敗中站起來。
12345678
返回列表 上一主題