為什么 VLookUp 不斷返回錯誤 2042？

Question

可能這不是從 2021 年 1 月 1 日這樣的日期將“Jan”轉換為“1”的最聰明方法，但為什么 VLookUp 不斷返回錯誤 2042？

Option Explicit

Dim MonthMatrix(0 To 1, 0 To 11 As Variant

MonthMatrix(0, 0) = "Jan"
MonthMatrix(1, 0) = 1
MonthMatrix(0, 1) = "Feb"
MonthMatrix(1, 1) = 2
MonthMatrix(0, 2) = "Mar"
MonthMatrix(1, 2) = 3
MonthMatrix(0, 3) = "Apr"
MonthMatrix(1, 3) = 4
MonthMatrix(0, 4) = "May"
MonthMatrix(1, 4) = 5
MonthMatrix(0, 5) = "Jun"
MonthMatrix(1, 5) = 6
MonthMatrix(0, 6) = "Jul"
MonthMatrix(1, 6) = 7
MonthMatrix(0, 7) = "Aug"
MonthMatrix(1, 7) = 8
MonthMatrix(0, 8) = "Sep"
MonthMatrix(1, 8) = 9
MonthMatrix(0, 9) = "Oct"
MonthMatrix(1, 9) = 10
MonthMatrix(0, 10) = "Nov"
MonthMatrix(1, 10) = 11
MonthMatrix(0, 11) = "Dec"
MonthMatrix(1, 11) = 12

month = "Sep"
month_number = Application.VLookup(month, MonthMatrix, 1, False)

Answer 1

這段代碼有很多問題，很難一一列舉。

• 選項顯式必須在程序之外
• 沒有定義程序
• 第一個 Dim 的左括號沒有匹配的右括號
• 矩陣設置 2 行 12 列
• 使用Option Explicit，需要定義month和month_number
• 你正在返回你正在查找的值

這只是沒有意義。