Transact Sql Replace Character In String Vba