Find and Replace from One Sheet to another VBA

[jeyachandran]

Hi,
I need a macro to Find and Replace strings from One Sheet to another.
ie,
Sheet2 (master) : Column A contain string that i want to find in Sheet1 and replace with the values given in Columns B
Sheet1: Column A will contain identical string from row 1 to myLastRow. Each cell will contain string found in Sheet2 (master), column A. I want to replace this string
with values from Sheet2 (master).
Note:
find and replace first whole word and then single word, Sample file attached for your reference..
example:
CARBON STEEL : CS
CARBON : CARBN
STEEL: : STL

 

[Marc L]

Hi, according to your attachment and the Macro Recorder :​

Sub Demo1()
    Dim V, R&
    V = Sheet2.[A1].CurrentRegion
    For R = 2 To UBound(V):  Sheet1.UsedRange.Columns(2).Replace V(R, 1), V(R, 2), 2:  Next
End Sub

Do you like it ? So thanks to click on bottom right Like !​

​

 

[jeyachandran]

Thanks sir,
But i need one more modification..ie find and replace first whole words (combination of words) and then single word, Sample file attached for your reference..
Could you help me to resolve it..
example:
CARBON STEEL : CS
CARBON : CARBN
STEEL: : STL

 

[Marc L]

So you must well order your list with words combinations before single words obviously …​

​

 

[jeyachandran]

Yes sir.but master file in alphabetical order and Stainless steel (Combination word) abbreviated as SS correctly..But Carbon steel not abbreviated.
then How to resolve this sir?

 

[Marc L]

Just do the obvious corrections to the list order as explained in post #4 …​

​

 

[jeyachandran]

Thank you sir..i will check it.