Utilizo essa Função, e dá certo
Tiracento(nNome)
*************************
nNome:=StrTran(nNome," ","a")
nNome:=StrTran(nNome,"Æ","a")
nNome:=StrTran(nNome,"…","a")
nNome:=StrTran(nNome,"ƒ","a")
nNome:=StrTran(nNome,"µ","A")
nNome:=StrTran(nNome,"Ç","C")
nNome:=StrTran(nNome,"·","A")
nNome:=StrTran(nNome,"¶","A")
nNome:=StrTran(nNome,"‚","e")
nNome:=StrTran(nNome,"Š","e")
nNome:=StrTran(nNome,"ˆ","e")
nNome:=StrTran(nNome,"","E")
nNome:=StrTran(nNome,"Ô","E")
nNome:=StrTran(nNome,"Ò","E")
nNome:=StrTran(nNome,"Ó","E")
nNome:=StrTran(nNome,"¡","i")
nNome:=StrTran(nNome,"Þ","I")
nNome:=StrTran(nNome,"Ø","I")
nNome:=StrTran(nNome,"×","I")
nNome:=StrTran(nNome,"¢","o")
nNome:=StrTran(nNome,"ä","o")
nNome:=StrTran(nNome,"•","o")
nNome:=StrTran(nNome,"“","o")
nNome:=StrTran(nNome,"à","O")
nNome:=StrTran(nNome,"å","O")
nNome:=StrTran(nNome,"ã","O")
nNome:=StrTran(nNome,"â","O")
nNome:=StrTran(nNome,"£","u")
nNome:=StrTran(nNome,"","u")
nNome:=StrTran(nNome,"é","U")
nNome:=StrTran(nNome,"š","U")
nNome:=StrTran(nNome,"‡","c")
nNome:=StrTran(nNome,"€","C")
nNome:=StrTran(nNome,"°","")
nNome:=StrTran(nNome,"±","")
nNome:=StrTran(nNome,"²","")
nNome:=StrTran(nNome,"¹","")
nNome:=StrTran(nNome,"º","")
nNome:=StrTran(nNome,"»","")
nNome:=StrTran(nNome,"¼","")
nNome:=StrTran(nNome,"#","")
nNome:=StrTran(nNome,"$","")
nNome:=StrTran(nNome,"%","")
nNome:=StrTran(nNome,"&","")
nNome:=StrTran(nNome,"¦","")
nNome:=StrTran(nNome,"§","")
nNome:=StrTran(nNome,"¨","")
nNome:=StrTran(nNome,"©","")
nNome:=StrTran(nNome,"ª","")
nNome:=StrTran(nNome,"«","")
nNome:=StrTran(nNome,"¬","")
nNome:=StrTran(nNome,"","")
nNome:=StrTran(nNome,"®","")
nNome:=StrTran(nNome,"¯","")
nNome:=StrTran(nNome,"³","")
nNome:=StrTran(nNome,"´","")
nNome:=StrTran(nNome,"¹","")
nNome:=StrTran(nNome,"½","")
nNome:=StrTran(nNome,"¾","")
nNome:=StrTran(nNome,"¿","")
nNome:=StrTran(nNome,"À","")
nNome:=StrTran(nNome,"Á","")
nNome:=StrTran(nNome,"Â","")
nNome:=StrTran(nNome,"Ã","A")
nNome:=StrTran(nNome,"Ä","")
nNome:=StrTran(nNome,"Å","")
nNome:=StrTran(nNome,"È","")
nNome:=StrTran(nNome,"É","")
nNome:=StrTran(nNome,"Ê","")
nNome:=StrTran(nNome,"Ë","")
nNome:=StrTran(nNome,"Ì","")
nNome:=StrTran(nNome,"Í","")
nNome:=StrTran(nNome,"Î","")
nNome:=StrTran(nNome,"î","")
nNome:=StrTran(nNome,"ï","")
nNome:=StrTran(nNome,"ð","")
nNome:=StrTran(nNome,"ñ","")
nNome:=StrTran(nNome,"ò","")
nNome:=StrTran(nNome,"ó","")
nNome:=StrTran(nNome,"ô","")
nNome:=StrTran(nNome,"õ","")
nNome:=StrTran(nNome,"ö","")
nNome:=StrTran(nNome,"÷","")
nNome:=StrTran(nNome,"ø","")
nNome:=StrTran(nNome,"ù","")
nNome:=StrTran(nNome,"û","")
nNome:=StrTran(nNome,"ü","")
nNome:=StrTran(nNome,"ý","")
nNome:=StrTran(nNome,"þ","")
nNome:=StrTran(nNome,"*","")
nNome:=StrTran(nNome,"'","")
nNome:=StrTran(nNome,",","")
Return(nNome)