Hallo zusammmen,

sitzte gerade an einem excel vba Projekt und bin auch schon recht weit gekommen, nur an einigen stellen funktioniert es noch nicht so wie es soll. In diesem fall versuche ich, die Anzahl zu zählen wie oft in der Tabelle ImpVs0 die spezifikationen aus Tabelle Landk erfüllt werden (hab natürlich jeweils ImpVs0 und Landk als Worksheet deklariert und auch LastRow gibt einen wert raus etc). Dies möchte ich aber nichtmehr über Range("M3" & ":M" & LastRow)... sonder über Cells(...,...) wie ihr unten sehen könnt (benötige ich für später). Allerdings funktioniert das mit Cells nicht (Laufzeitfehler 1004: Die Methode Range für das Objekt Worksheet ist fehlgeschlagen) und ich stehe auf dem schlauch wieso das nicht klappt. Danke schonmal im Voraus.

'Funktioniert
Landk.Cells(a, 15) = Application.WorksheetFunction.Countifs(ImpVs0.Range("M3" & ":M" & LastRow), "=" & Landk.Cells(a,1), ImpVs0.Range("P3" & ":P" & LastRow), "=" & Landk.Cells(a, 5))

'Funktioniert nicht
Landk.Cells(a, 15) = Application.WorksheetFunction.Countifs(ImpVs0.Range(Cells(3, 13),  Cells(LastRow, 13)), "=" & Landk.Cells(a,1), ImpVs0.Range(Cells(3, 16), Cells(LastRow, 16)), "=" & Landk.Cells(a, 5))