Match met dubbele criteria in vba

Status
Niet open voor verdere reacties.

BastS

Gebruiker
Lid geworden
12 mrt 2015
Berichten
52
Ik heb een probleem met een dubbele criteria in een match formule binnen vba.

Code:
With Worksheets("test")
    lastrow = Cells(.Rows.Count, "F").End(xlUp).Row

    i = Application.Match(zoekwaarde A & zoekwaarde B, .Range(.Cells(6, 2), .Cells(lastrow, 2)) & .Range(.Cells(6, 6), .Cells(lastrow, 6)))
    ' i = Application.Match(zoekwaarde A & zoekwaarde B, ("B6:B" & lastrow) & ("F6:F" & lastrow))

End With

De moeilijkheid zit hem voor mij in het variabel houden van beide zoek ranges. Kan iemand mij hierin helpen waarom een van bovenstaande regels niet werkt. De zoekwaarden bevinden zich wel in de zoekrange, en ik heb de zoekwaarden ook niet omgedraaid.
 
Een variabele met een spatie erin kan natuurlijk niet. Probeer het zo eens
Code:
ar = Worksheets("test").Range("B6:F" & .Cells(Rows.Count, 6).End(xlUp).Row)
  For j = 1 To UBound(ar)
    If ar(j, 1) = zoekwaardeA And ar(j, 5) = zoekwaardeB Then
      MsgBox j
      Exit For
    End If
  Next j
 
Ja, spatie was alleen in het voorbeeld. Maar de oplossing werk, bedankt.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan