valeu cara, mas eu dei uma pesquisada aqui e fiz desse jeito vou mandar so para ficar registrado se alguém tiver a mesma duvida. você sabe onde eu pego uma apostila de VBA to correndo atraz Ta ai o codigo para tirar ponto Dim db As dao.Database Dim rs As dao.Recordset Dim numreg As String Dim Conteudo As String Set db = CurrentDb() Set rs = db.OpenRecordset("nome da tabela") numreg = rs.RecordCount rs.MoveFirst Do Until rs.EOF Conteudo = rs("campo").Value Conteudo = Replace(Conteudo, ".", "") Conteudo = Replace(Conteudo, "-", "") rs.Edit rs("campo").Value = Conteudo rs.Update rs.MoveNext Loop eu botei no click do botão mas ai fica a critério da pessoa Obrigado pela atenção