Problem in WITH/END WITH code snippet

[Hash]

Gang -

In set range r this code works:

With r
.formula = .value
End With

This doesn't:

With r
.formula = vba.replace(.value,chr(160),chr(32),1)
End With

What am I missing?

Thanks in advance.
....best, Hash

 

[Guest]

Is this what you want?

For Each cell In r
cell.Value = Replace(cell.Value, chr(160), chr(32), 1)
Next

 

[Guest]

rowno = Selection.Find("123").Row