Excel 如何解决Application.Worksheetfunction.Match错误？

我在网上搜索答案，但没有任何效果（找到5-6个不同的解决方案，但对我都不起作用）

我的应用程序匹配有1004个错误。在我的情况下，它应该提供从数据表到列E_菜单-“菜单”的范围，这样我可以从已经创建的列表中选择一个条目并编辑它，但由于某些原因它不起作用

我尝试定义列E_菜单，更改范围（“xxxxx”）的变体，该范围最初是Dyn_全名或smth，但也不起作用

Option Explicit

Private Sub CommandButton1_Click()

Dim TargetRow As Integer 
```TargetRow = Application.WorksheetFunction.Match(ColumnE_Menu, Sheets("Data").Range(Cell1:="B2", Cell2:="D4"), 0)```
Sheets("Engine").Range("B5").Value = TargetRow for use later

Unload Find_Entry_UF 

'''Begin retrieving data from database'''
Data_UF.Txt_Update = Sheets("Data").Range("Data_Start").Offset(TargetRow, 2).Value 'first name
Data_UF.Txt_Description = Sheets("Data").Range("Data_Start").Offset(TargetRow, 3).Value 'surname
Data_UF.Txt_Owner = Sheets("Data").Range("Data_Start").Offset(TargetRow, 4).Value 'age
Data_UF.Txt_Proc = Sheets("Data").Range("Data_Start").Offset(TargetRow, 6).Value 'gender combo box
Data_UF.Combo_Status = Sheets("Data").Range("Data_Start").Offset(TargetRow, 7).Value 'region combo box
'''End retrieving data from database'''

Data_UF.Caption = "Edit Existing" 'set caption to show that the user is editing
Data_UF.Show 'show the user form with the details loaded in

End Sub

---

Match

需要一列或一行范围。我如何做到这一点？我可以使用列B，例如，从1到最后一个条目的索引号将匹配范围更改为类似于

Sheets（“数据”）.range（“B2:B4”）

或需要多少行。我也尝试过，我第一次猜测将动态范围更改为smth，如B8:B11，但它给出了相同的错误，然后找不到您的查找值。