VBA Dynamic Range mit Werten Berechnung

Question

Hallo, ich habe folgendes Problem:

Wie Sie in der Spalte A sehen wir haben Termine, in Spalte B gibt es immer eine „1“, wenn ein Jahr wechselt von einem zum nächsten Ich habe es gelb markiert. In Spalte H sind verschiedene Werte und in Spalte I möchte ich nur den FIRST-Wert haben, der innerhalb eines Jahres größer ist (in diesem Fall) als 10% (also im Zeitraum von eins bis eins in Spalte B). Danach möchte ich den nächsten ersten Wert haben, der im nächsten Jahr> 10% ist, also nächste Periode von 1 bis 1 in Spalte B und so weiter.

Kann mir jemand helfen?

Bisher habe ich dies programmiert, aber es zeigt mir alle Werte> 10% aber nicht die ersten aus jedem Bereich für jeden Bereich.

Sub ABC() 
With ThisWorkbook.Worksheets("Test") 
rowCount = 2 
    Do While .Cells(rowCount + 1, 8).Value <> "" 

    If .Cells(rowCount, 2).Value = 0 And .Cells(rowCount, 8).Value >= 0.1 Then 

     .Cells(rowCount, 9).Value = .Cells(rowCount, 7).Value * 0.1/1.1 
    Else 
     .Cells(rowCount, 9).Value = "" 
    End If 
    rowCount = rowCount + 1 

Loop 

End With 
End Sub 

Answer 1

den Code scheint ist Fehler auf der Zell Adresse

Sub ABC() 
With ThisWorkbook.Worksheets("Test") 
rowCount = 2 
    Do While .Cells(rowCount + 1, 8).Value <> "" 

    If .Cells(rowCount, 2).Value = 0 And .Cells(rowCount, 8).Value >= 0.1 Then 

     .Cells(rowCount, 9).Value = .Cells(rowCount, 8).Value * 0.1/1.1 
    Else 
     .Cells(rowCount, 9).Value = "" 
    End If 
    rowCount = rowCount + 1 

Loop 

End With 
End Sub