Convert cell function to VBA

[ChristineJ]

The follwoing FILTER function is in cell H18 to filter out rows that match a string in column C. It works as I need it to.

=IF(AND(TRIM(FILTER($D$6:$E$13,IFERROR(SEARCH($C$6,$C$6:$C$13,1),"")<>""))=J8:K11)=TRUE,"Resolved","No")

Is there a way to return either "Resolved" or "No" to H18 using Application.WorksheetFunction in VBA and running a macro? H18 would be blank until the macro is run.

Thanks!

 

[ISY]

Hi

[H18].Value = Application.Evaluate("IF(AND(TRIM(FILTER($D$6:$E$13,IFERROR(SEARCH($C$6,$C$6:$C$13,1),"""")<>""""))=J8:K11)=TRUE,""Resolved"",""No"")")

 

[ChristineJ]

Works perfectly! Thanks so much for your help, ISY. C