Notifications
Clear all

Retirando o "-" do CPF

5 Posts
3 Usuários
0 Reactions
935 Visualizações
(@chacal)
Posts: 9
Active Member
Topic starter
 

Caros, Boa Tarde!

Por gentileza, estou com uma planilha com vários números de CPF no seguinte formato:
084267367-93
Eu preciso retirar os "-", sendo que ao substituir o "-", o excel está removendo também o 0 da frente, deixando assim:
8426736793

Como excluir o "-" e manter o zero na frente ? preciso do campo com 11 dígitos mesmo.

Att:

 
Postado : 16/02/2015 12:31 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Não entendi, você pode usar a formatação personalizada, Ctrl+1 ir personalizar, poder suar uma formula.

=TEXTO(A2;"00000000000")

, remova usando Ctrl+L e substituir os "-", depois ao lado use a formula acima.

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 16/02/2015 12:39 pm
(@robo8268)
Posts: 73
Trusted Member
 

muda o formato para personalizado, e coloca o formato 00000000000

 
Postado : 16/03/2015 11:10 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

chacal, boa tarde!

Segue minha contribuição em VBA.

O Código abaixo serve para tirar acentos, traços, asteriscos e etc...

Basta colar o código em um módulo.

Function Acentos(vtexto As String)
    
    vCom_Acento = "ÀÁÂÃÄÅÇÈÉÊËÌÍÎÏÒÓÔÕÖÙÚÛÜàáâãäåçèéêëìíîïòóôõöùúûü*-"
    vSem_Acento = "AAAAAACEEEEIIIIOOOOOUUUUaaaaaaceeeeiiiiooooouuuu"
    
    For i = 1 To Len(vtexto)
        vposicao = InStr(vCom_Acento, Mid(vtexto, i, 1))
        
        If vposicao > 0 Then
            vtexto = Replace(vtexto, Mid(vCom_Acento, vposicao, 1), Mid(vSem_Acento, vposicao, 1))
        End If
    Next

Acentos = vtexto

End Function

Depois insira a função =Acentos(A1) . Altere o A1 pela célula que conter os CPF's.

Dê retorno!

Att,

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 16/03/2015 11:54 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Ao retirar o hífen do numero, o Excel passa a entender o valor como numérico, e por padrão, zeros à esquerda de números não são considerados.
Se utilizar a formatação personalizada, conforme sugerido acima, terá visualmente a numeração com os Zeros à esquerda, porem o valor interno não;
Assim no seu exemplo o visual na planilha será :--> 08426736793, porem o valor gravado/interno será 8426736793.

Uma possibilidade: Supondo o CPF Em A1 em A2=TEXTO(SUBSTITUIR(A1;"-";"");"00000000000")

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 16/03/2015 1:49 pm