我在同一台電腦裝了Office 2016 及2010
2016 公式會跑掉, 抓不到股價
2010 抓股價沒問題
所以是office 2016 的問題

同意brianchen168 的看法
剛剛把office2016移除重灌office2013之後  就恢復正常了 蠻奇怪的

我更慘, 移掉 office 2016 , 再重新灌, 卻出現 30068-4(3), 現在完全無法安裝 office 2016

如果是win10用系統重設吧XDD 至少不用光碟

回報一下我用 Win 10 + Office 365
1705c 無法抓到台股股價
舊的盈再表(1703g)本來正常的也直接出現下列錯誤訊息
執行階段錯誤 '1004':
無法對合併儲存格執行該動作

不好意思發佈的訊息字型不曉得怎麼會變這麼大

方家晟 於 2017年5月7日 下午8:18 寫道：

這在微軟上很常見，每個版本的VBA程式碼會有名稱、語法、作用的變動，擴增或停用。32位元和64位元的VBA名稱、語法、功能亦不完全通用，除了excel，微軟的資料庫access也有版本完全不相容的狀況。

個人是從2007 一次跳win 10 + 2016 64位元, 也是怪怪, 是否可以建議, 成功沒問題同學可以把自己環境資訊分享給大家. 畢竟office 不便宜, 省得大家耗時耗錢.
平台: WIN 版本, 是否是Mac 下?
Office 裝哪個版本 如2013 中文, 64位元或是32位元.

同學再等等，看方桑能否解決？期待中！

工程龐大，需要幾天測試，
有勞Ben方桑，請同學再等等。

另外ADR也是有受影響的地方，目前在win10+office2016下看起來除了德國法國的ADR沒有受影響，其他國家都是抓的到股價，但預期報酬率，淑貴價，現在PER都無法正常顯示，還麻煩Michael測試時稍微注意一下，感謝。

Office2016相容版

改好了，請重新下載1705c
請用Office2016同學測試一下是否OK，跟我們回報結果，謝謝。
非常感謝方家晟桑大力幫忙。



On May 8, 2017, at 1:07 AM, 方家晟  wrote:

這個檔案已經可用，您再檢查看看儲存格內的公式、摘取的值是否正確。VBA碼還有許多地方可以整理，或許您再問問其他工程師或程式方面的先進有沒有什麼看法，畢竟我是撰寫程式的外行，沒改好恐怕降低效率。
每一次及時的問題處理，都可能造成程式碼的重複、凌亂不一...留下隱患。
這次我疏忽了重複的檢查，沒注意到程序最後面用了這句：
ThisWorkbook.QueryTablesDelete ActiveSheet.Name

使得"基本資料"後面用了這句：
QueryTablesDelete ActiveSheet.Name

外加在Module4最底下新增了Function QueryTablesDelete(ash As String)。
這部分再麻煩您出新版時將Module4及uncon的"基本資料"匯入後面QueryTablesDelete ActiveSheet.Name這句改成ThisWorkbook.QueryTablesDelete ActiveSheet.Name。並去掉最底下整組Function QueryTablesDelete(ash As String)。感謝。
Module4來說，這個模組總計5043字，QueryTables.Add高達21組，去掉重複的部分可以降到3449字。
抓取網頁資料的問題，可以在每一次抓取後加上一個檢查，更方便使用者回報錯誤是發生在什麼地方，同時改進摘取資料的方式，在彈性和效率間取捨。

各位程式相關人員辛苦了，我回報一下我的情形，我的是office2016，1705c剛重新下載後，出現抓不到股息，雖然有出現抓不到股價，但股價欄仍有出現股價。

Win 10 pro 64 2016 64
只有 2850 會這樣, 其它沒問題

昨天Ben桑幫我們修改盈再表到1:00多，足感心兮(台語的e)。
一位素昧平生的網友這麼熱心幫忙，萬分感謝。
已邀請他免費來上課，聊表謝忱。
希望他務必賞光。