Find last occurrence of a text string in multi-line cell

[CF64]

Hello,
I have a formula which will find a text string in column A and return the line on which it first appears in column B.
=IFERROR(MATCH("*apple*",FILTERXML("<K><M>"&SUBSTITUTE(a1,CHAR(10),"</M><M>")&"</M></K>","//M"),0),"")

Is there a way to modify the formula to find the last appearance of apple in column A and return the line in column B, so that instead of a 2 in column B it would be a 4?

Thank you in advance

A	B
pear apple orange apple grapes	2

 

[Fluff]

How about

=XMATCH("apple",TEXTSPLIT(A1,CHAR(10)),,-1)

 

[CF64]

How about

=XMATCH("apple",TEXTSPLIT(A1,CHAR(10)),,-1)

Thank you!!

 

[Fluff]

You're welcome & thanks for the feedback.