[算表] 在未開啟的情況下抓取excel表的資料

看板Office作者kevin619008 (尻川)時間3月前 (2024/08/13 22:07)推噓0(0推 0噓 3→)

留言3則, 1人參與討論串1/1

軟體:excel、VBA 版本:2021 各位好事情是這樣的，我們公司每個專案會有各自的excel表來記錄各個專案的進度或事件然後有個總表會把各專案的最新進度複製過去，主管平常用這個總表確認各專案的進展之前我們公司都是用人力手工複製，各專案負責人有新進度時除了要更新自己的表之外，還要複製到總表去，整個就很耗時費工所以我就開始想讓excel總表可以自動複製各專案excel的最新進度我一開始用excel內建的函數都可以讓總表在未開啟各專案的excel表的情況下就抓到資料例如說，總表的每個row代表不同專案，B column 是日期， cell["B1"] = MAX([專案的excel檔名]進度表!B:!B) 這樣就能抓到最新進度的日期但因為還需要設定各種各樣的條件，所以要新增欄位，加上總表本來就花了很多欄紀錄專案的資訊，所以導致總表欄數很多，平時維護又變得麻煩所以我又開始用vba想辦法把之前用很多欄才搞定的公式可以直接在一個儲存格內就解決但接著就發現使用者自訂的函數沒辦法在未開啟excel檔案的情況下抓取該檔案的資料例如，我在總表的module裡新增以下function Function test(rg1 As Range) As Variant Dim newest_date As Long newest_date = Application.WorksheetFunction.Max(rg1) If CDate(newest_date) >= Date Then test = CDate(newest_date) Else: test = "無最新進度" End If End Function 然後總表的cell["B1"] = test([專案檔案名稱]進度表!B:!B) 當專案進度表也打開時就能抓到資料，但若未開啟就抓不到，會出現# VALUE! 換言之，用excel內建的函數可以抓到未開啟檔案的資料，但使用者自訂的不行請問有高人能指點該如何解決嗎?vba code是否還需要設定甚麼才能讓它抓到未開啟檔案的資料? 我google過發現類似的問題都是用sub解決但明明用excel 內建的function 就能抓未開啟檔案的資料，為何自訂的function不行? 拜託各位了 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 111.241.143.132 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1723558067.A.C4B.html