1. "the selling price for this is £2.99 and the product code is 123456"

=LEFT(MID(A2,SEARCH("L",A2)+1,256),SEARCH(" ",MID(A2,SEARCH("L",A2)+1,256))-1)


2. if activecell.value = "" then
ThisWorkbook.Saved = True
Application.Quit
End if

Please, next time post different questions in separate messages!

Regards,
Stefi