сопоставление индекса с использованием раскрывающегося значения для выполнения сопоставления

Question

У меня есть проблема, когда я хочу сопоставить два раскрывающихся значения, чтобы извлечь значение из диапазона. Это то, с чем я сталкиваюсь в настоящее время, возникает ошибка: «Невозможно получить класс свойства индексаРабочий лист функции класса "

Sub hamtakost()

Dim wbd As Worksheet
Dim wb1 As Worksheet
Dim wb2 As Worksheet
Dim wb3 As Worksheet
Dim DD4 As Object
Dim DD5 As Object

  Set wbd = Worksheets("DASHBOARD")
  Set wb1 = Worksheets("1 år")
  Set wb2 = Worksheets("2-10 år")
  Set wb3 = Worksheets("INDEX")

  wbd.Shapes("Drop Down 4").ControlFormat.RemoveAllItems
  wbd.Shapes("Drop Down 5").ControlFormat.RemoveAllItems

  Set DD4 = wbd.Shapes("Drop Down 4").OLEFormat.Object
  Set DD5 = wbd.Shapes("Drop Down 5").OLEFormat.Object

  test = Application.WorksheetFunction.Index(wb2.Range("C5:N225"), _
Application.Match(DD4, wb2.Range("B5:B25"), 0), Application.Match(DD4, _
wb2.Range("C3:N3"), 0))

End Sub