update grids set data = cast(replace(cast(data as nvarchar(max)),'{\f1\fnil\fcharset0 Courier New;}','{\f1\fnil\fcharset0 FreeMono;}') as xml)
where cast(data as nvarchar(max)) like '%{\f1\fnil\fcharset0 Courier New;}%'