Find text in a cell and replace with text from another cell

[Flexi1]

Hi

This might be a really silly question but how do you find specific text located in one cell e.g. C1 and replace the text with the content from another cell e.g. A1

I need to copy all the text from A1 and find and replace specific text from C1 with the content from A1

This then needs to replicated down the spreadsheet with 20,000 rows

Hope someone can help me out here

 

[mohadin]

Hi
As I understand

Sub test()
    Dim x, lr, i, ii
    InputBox ("TYPE text to be Changed")
    For i = 1 To Cells(Rows.Count, 3).End(xlUp).Row
        x = Split(Cells(i, 3), " ")
        For ii = 0 To UBound(x)
            If x(ii) = "NNN" Then
                x(ii) = Cells(1, 1)
            End If
        Next
        Cells(i, 4) = Join(x, " ")
    Next
End Sub