Does for me. XL04, XL03.

Your macro works fine as well. Only replaces 740 in column W.


What happens when you don't select:

Sub Macro3()
Columns("W:W").Replace _
What:=740, _
Replacement:=989, _
LookAt:=xlWhole
End Sub

In article ,
"Simon" wrote:

No, that dosen't work