台灣最大程式設計社群網站
線上人數
995
 
會員總數:246135
討論主題:189716
歡迎您免費加入會員
討論區列表 >> office VBA / WinOS >> VBA 外部資料更失敗錯誤碼
[]  
[我要回覆]
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
VBA 外部資料更失敗錯誤碼
價值 : 50 QP  點閱數:203 回應數:0
樓主


門外漢
0 1
16 0
發送站內信



各位大大好

小弟遇到一個無法解決的問題,主要狀態如下文長再請大神耐心解答

資料以excel為主體

簡單說

表格手動更新時正常無任何問題,以VBA操作時出現錯誤碼1004,在本機無法執行,換電腦就正常。

==========================================================================================

詳細狀況如下

資料內容以"表格"格式,並以power query構成,環境在同一資料夾中A、B檔內容更新至C檔 ( A、B、C皆為.xlsx檔)

以手動按"重新整理"連結外部資料(A、B檔)時正常可更新

以VBA內碼如下

Range("XXXX").ListObject.QueryTable.Refresh BackgroundQuery:=False

顯示錯誤碼1004

資料來源的初始設定失敗

檢查資料庫伺服器或聯絡您的資料庫系統管理員,然後再次嘗試.......云云略

修改語法

Range("XXXX[[#Headers],[A]]").Select

Selection.ListObject.QueryTable.Refresh BackgroundQuery:=False

亦同上錯誤

如此時中斷VBA,以手動更新C檔後存檔關閉,再以手動執行VBA則無錯誤訊息且可正常更新

(VBA內容於D檔)

但將VBA檔關閉後,重啟VBA ( Private Sub Workbook_Open() ) 時,相同故障碼出現

此時如無將C檔手動更新並直接關閉後,以手動執行VBA則亦同,顯示相同錯誤訊息無法正常更新

如將A、B、C、D檔複製至另一台電腦時可正常執行並無問題,複製回原電腦後一樣問題持續,隔日另台電腦淪陷

此系統原正常執行一年以上但至9/1起突然顯示出以上問題

原電腦已重灌office 2019狀況依舊。

小弟直覺是不是VBA關掉了什麼而造成此狀況。

請求好心大神給予解答



搜尋相關Tags的文章: [ ListObject.QueryTable.Refresh ] ,
本篇文章發表於2020-09-04 17:37
目前尚無任何回覆
   

回覆
如要回應,請先登入.