excel - 如何在excel VBA上使用索引+匹配

Question

我正在尝试使用 excel 命令、索引和匹配来执行任务，但是在使用它时，我不断收到错误返回。我已经在我的代码中说明了我的两个数组，但我似乎无法真正找出问题所在。

                     Dim WorkOrderDeliverableDatelastRow As Long
                     WorkOrderDeliverableDatelastRow = .Range("E" & Rows.Count).End(xlUp).Row
                     
                     Dim DeliverableDatelastRow As Long
                     DeliverableDatelastRow = .Range("K" & Rows.Count).End(xlUp).Row
                     
                                              
                      Set WorkOrderRange = .Range("E2:E" & WorkOrderDeliverableDatelastRow).SpecialCells(xlCellTypeVisible)
                      
                      
                      
                      Set DeliverableDateRange = .Range("K2:K" & DeliverableDatelastRow).SpecialCells(xlCellTypeVisible)
                      
                      
                    workOrder = Application.Index(WorkOrderRange, Application.Match(cel.Value, DeliverableDateRange, 0))

标签： excelvba