ник: ДрЮня
может перебором всех записей +
Function Replace(Expression As String, Find As String, Replace As String, [Start As Long = 1], [Count As Long = -1], [Compare As VbCompareMethod = vbBinaryCompare]) As String
и, наверное, нужно делать замену на этапе загрузки данных в БД