Get the contents of column A and put it in Column B overwiting a tag

[allencunningham]

I am working with just 2 columns. I am writing a macro to get the value from column A
and put it in column B, overwriting the tag style, so that row 1 appears like the following:

The Regency Straight Back is a traditional .....,
and do this for all rows

Column A | Column B |
Regency Straight Back | The style is a traditional .... |
Modern Alba | This style is our latest ...... |
Classical Wide back | Our new style is finally available ... |

 

[Sequoyah]

Re: Get the value from one column and put in another column

Hi Allen,

try without omitting the optional arguments in Find Parameters:

Sub ReplaceXXX()
    
    Dim i As Integer
    Dim LastRow As Integer
    
    LastRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
    
    For i = 1 To LastRow
        
        Range("B" & i).Replace What:="XXX", Replacement:=Range("A" & i).Value, LookAt:=xlPart, SearchOrder:=xlByColumns, MatchCase:=False, _
    SearchFormat:=False, ReplaceFormat:=False
        
        
    Next
    
End Sub

If it still doesn't work, please publish an example of the text you have in column A and column B

 

[allencunningham]

Re: Get the value from one column and put in another column

Hi Sequoyah - Actually the first one worked fine when I tried it again. Even though the 'XXX' occurred multiple times and was buried inside hundreds of words of html text, it was able to do the replace for every occurrence.

Thanks

Allen