Dear Roberto Mensa
First, many thanks for your valuable help. (sorry for the late reply).
The code was really helpful but with one issue. The code successfully splits
the multi line test to individual texts. But there was some issue with the
text replacement. I solved it with the following code.
-
I'm not sure of having understood,
try:
Sub MFR_Textbox()
Dim Wks As Worksheet
Dim rngSrch As Range
Dim rngFind As Worksheet
Dim rngFound As Range
Dim oShp As Shape
Dim oTotalRng As Variant
Dim oTxtRng As Variant
Dim oTxtRng1 As Variant
Dim oTxtRng2 As Variant