Alguma função do Excel que reverterá uma string?


Respostas:


9

Não há nenhuma função interna que eu saiba, mas você pode criar sua própria função personalizada.

Primeiro - crie um novo módulo:

  1. Entre no VBA (pressione Alt + F11)
  2. Inserir um novo módulo (Inserir> Módulo)

Segundo - cole a seguinte função no seu novo módulo ( referência ):

Function Reverse(Text As String) As String
    Dim i As Integer
    Dim StrNew As String
    Dim strOld As String
    strOld = Trim(Text)
    For i = 1 To Len(strOld)
      StrNew = Mid(strOld, i, 1) & StrNew
    Next i
    Reverse = StrNew
End Function

Agora você deve poder usar a função Reverse em sua planilha


62

A resposta atual aceita é uma maneira ruim de reverter uma string, especialmente quando existe uma incorporada no VBA, use o seguinte código (deve agir da mesma maneira, mas executar MUITO mais rápido):

Function Reverse(str As String) As String
    Reverse = StrReverse(Trim(str))
End Function

@ n00b - "como criar um módulo" não era a questão. :) Esta solução é muito mais eficiente / mais rápida / mais fácil, embora eu não tenha certeza do porquê TRIMfoi adicionada, pois espaço em branco extra não foi especificado na pergunta. Para conjuntos de dados "enormes", remova TRIMse não precisar.
— ashleedawg
Ao utilizar nosso site, você reconhece que leu e compreendeu nossa Política de Cookies e nossa Política de Privacidade.
Licensed under cc by-sa 3.0 with attribution required.