How do i prevent the 2nd Instance of patricular String being Replaced using REPLACE Function

[NimishK]

Hello

How do i prevent the 2nd Instance of patricular String being Replaced using REPLACE Function

For Eg
Amount 75000.00
ID Number 2229400331
Status Amount Trfd

so i would like to prevent string Amount being replaced in line Status Amount Trfd

using the Below code

Dim Strline As String
         Strline = Replace(Strline, "Amount", vbCrLf & "AMOUNT")
         Strline = Replace(Strline, "ID Number", vbCrLf & "ID NUMBER")
         Strline = Replace(Strline, "Status", vbCrLf & "STATUS")

I get below result

AMOUNT 75000.00
ID NUMBER 22229400331
STATUS Amount Trfd
AMOUNT Trfd

Instead of

AMOUNT 75000.00
ID NUMBER 22229400331
STATUS Amount Trfd

Your help will be appreciated

NimishK

 

[NimishK]

Alex Sir,

Indeed the perfect coding by you. It Resolved what i desired

Thank you so much for your time and efforts to get this resolved


and Thanks to members who also posted their logic to this thread

NimishK

 

[Alex Blakenburg]

You're welcome. Glad we could help.