Hi
Add the code below to a general module in your workbook, select sheet1 and run. The output formula is in AH1
Sub aaa()
endrow = Cells(Rows.Count, "B").End(xlUp).Row
For i = endrow To 4 Step -1
If IsEmpty(Cells(i, "B")) Then
Cells(i, "B").Value = holder
Else
holder = Cells(i, "B").Value
End If
Next i
Range("AH1").FormulaArray = "=SUM((ISNUMBER(SEARCH(""*Non-MOTO*"",B4:B" & endrow & "))+ISNUMBER(SEARCH(""*MOTO Chargebacks*"",B4:B" & endrow & ")))*(C4:C" & endrow & "=""Personal"")*(AH4:AH" & endrow & "))"
End Sub
rylo
Bookmarks