Problem in WITH/END WITH code snippet

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

Is this what you want?

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

"[email protected]" wrote:

> 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
>

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

"[email protected]" wrote:

> 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
>