Aqui está uma abordagem usando o VBA:
- Abra o IDE do Visual Basic usando Alt + F11
- Insira um novo módulo público usando Alt + eu , M
-
Cole o seguinte código no módulo:
Function StripPeriods(strArg As String) As String Dim intPos As Integer Dim intCha As Integer intPos = InStr(1, strArg, ". ") If intPos > 0 And intPos + 2 < Len(strArg) Then intCha = Asc(Mid(strArg, intPos + 2, 1)) If intCha > 96 And intCha < 123 Then StripPeriods = Left(strArg, intPos - 1) & StripPeriods(Mid(strArg, intPos + 1)) Else StripPeriods = Left(strArg, intPos) & StripPeriods(Mid(strArg, intPos + 1)) End If Else StripPeriods = strArg End If End Function
-
Em uma nova coluna ou planilha, chame a função acima em uma fórmula que faça referência às células-alvo, por exemplo:
=StripPeriods(A1)
-
Selecione & copie os resultados da fórmula ( Ctrl + C )
- Cole os resultados como Valores sobre as células originais ( Ctrl + Alt + V )