[算表] ExcelVBA函數Application.Match一問

看板Office作者 (Blue night)時間6年前 (2017/08/26 00:45), 編輯推噓0(002)
留言2則, 2人參與, 最新討論串1/1
軟體:EXCEL 版本:2010 想要做一個自訂函數 偵錯如下 Function MonthAfter(Mycell, MonthAfterNum, Holidays) 那一天 = DateSerial(Year(Mycell), Month(Mycell) + MonthAfterNum, Day(Mycell)) 星期幾 = Application.Weekday(那一天, 2) Do While 星期幾 = 6 Or 星期幾 = 7 那一天 = 那一天 + 1 星期幾 = Application.Weekday(那一天, 2) Loop 假日 = Application.Match(那一天, Holidays, 0) MonthAfter = 假日 發現結果一定是 #N/A 但確定 那一天 一定存在於 Holidays 請問是為何 因為相同情形我使用 假日 = Application.CountIf(Holidays, 那一天) 結果會是 1 也就是有包含到 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.137.49.216 ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1503679547.A.020.html

08/26 10:52, , 1F
那一天=clng(dateserial(....))
08/26 10:52, 1F

08/27 00:19, , 2F
又學到一課 感謝S大
08/27 00:19, 2F
文章代碼(AID): #1Pe5Gx0W (Office)