請教如何在EXCELL取得該網站之"即時估計淨值" - Excel程式區

GBKEE

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

11^# 跳轉到 »

發表於 2015-7-19 10:13 | 只看該作者

本帖最後由 GBKEE 於 2015-7-19 10:39 編輯

回復 6# lcctno
http://forum.twbts.com/thread-14577-1-1.html 會是同樣的問題嗎

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

TOP

no3-taco

中學生 Rank: 2

帖子: 41
主題: 0
精華: 0
積分: 79
點名: 0
作業系統: win7
軟體版本: 2010
閱讀權限: 20
性別: 男
註冊時間: 2014-4-1
最後登錄: 2016-2-17

12^#

發表於 2015-7-19 11:26 | 只看該作者

本帖最後由 no3-taco 於 2015-7-19 11:28 編輯

參考看看
從版大程式碼再稍微修改的地方

Do While .Busy Or .ReadyState <> 4: DoEvents: Loop
'Application.SendKeys "~", True '按下同意鍵 =>省略也可以
Do While .Busy Or .ReadyState <> 4: DoEvents: Loop
Wait Now + #12:00:01 AM# =>好像缺一個等待時間
.
.
.
.PasteSpecial Format:="HTML", Link:=False, DisplayAsIcon:=False, NoHTMLFormatting:=True
.
.

複製代碼

TOP

lcctno

中學生 Rank: 2

帖子: 142
主題: 18
精華: 0
積分: 160
點名: 312
作業系統: win10 64位元
軟體版本: office2003
閱讀權限: 20
性別: 男
來自: 臺灣高雄市
註冊時間: 2015-7-18
最後登錄: 2024-11-23

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章

13^#

發表於 2015-7-19 14:31 | 只看該作者

回復 11# GBKEE
我的問題是要做個簡單的按鈕之EXCELL程式當點按鈕就能自動更新EXCELL內之"即時估計淨值" 應該是不同的情形吧! 但還是非常的感謝您的回覆

TOP

lcctno

中學生 Rank: 2

帖子: 142
主題: 18
精華: 0
積分: 160
點名: 312
作業系統: win10 64位元
軟體版本: office2003
閱讀權限: 20
性別: 男
來自: 臺灣高雄市
註冊時間: 2015-7-18
最後登錄: 2024-11-23

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章

14^#

發表於 2015-7-19 14:42 | 只看該作者

回復 12# no3-taco

非常的感謝您的回覆但對初次使用VBA的我很難由您所提供的修改而有能力的完全組合版大與您的建議去完成完整的VBA 可否拜託您給個完整的語法先謝謝您了

TOP

GBKEE

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

15^#

發表於 2015-7-19 14:51 | 只看該作者

回復 13# lcctno

我的問題是要做個簡單的按鈕之EXCELL程式當點按鈕就能自動更新EXCELL內之"即時估計淨值" 應該是不同的情形吧!

可自行在工作表上插入一按鈕將"即時估計淨值"的程序指定到這按鈕

如圖

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

TOP

lcctno

中學生 Rank: 2

帖子: 142
主題: 18
精華: 0
積分: 160
點名: 312
作業系統: win10 64位元
軟體版本: office2003
閱讀權限: 20
性別: 男
來自: 臺灣高雄市
註冊時間: 2015-7-18
最後登錄: 2024-11-23

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章

16^#

發表於 2015-7-19 14:59 | 只看該作者

回復 11# GBKEE

我很急著要用那功能原先"即時估計淨值" 一直都沒發生問題但元大寶來之網站改版之後我的原先土法鍊鋼之EXCELL檔就無法即時的知道淨值還需要另開網頁並手動輸入數個數據實在很頭大我已經發費很多時間爬文了但一直找尋不到方法所以最後不得不註冊加入會員並發帖求救希望能有人幫我.....

TOP

lcctno

中學生 Rank: 2

帖子: 142
主題: 18
精華: 0
積分: 160
點名: 312
作業系統: win10 64位元
軟體版本: office2003
閱讀權限: 20
性別: 男
來自: 臺灣高雄市
註冊時間: 2015-7-18
最後登錄: 2024-11-23

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章

17^#

發表於 2015-7-19 15:58 | 只看該作者

回復 15# GBKEE

由於網站的規定我每小時只能回覆3次且又無權限發短消息很抱歉讓您久等我的回覆了

於第一時間時我有依您的語法完成但點它只會自動開啟IE並到那網站並不會自動把DATA匯入我的EXCELL內所以我才會繼續問下去希望有人能幫助笨笨的我解決這個問題其實我發現陸續有網站已無法使用 "匯入外部資料新增WEB查詢" 來取得DATA 所以我早晚還是要面對它並學會它

以下是我在apk.tw所發的帖若您對股市有興趣不妨去看看

碎鑽當然要想辦法賺但T50反1 (00632R)的真鈔您想賺嗎?
http://apk.tw/forum.php?mod=viewthread&tid=647659&fromuid=685805
(出處: Android 台灣中文網)

00632R T50反1 這帖沒碎鑽但有我賺真鈔的統計分析
http://apk.tw/forum.php?mod=viewthread&tid=672636&fromuid=685805
(出處: Android 台灣中文網)

TOP

no3-taco