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.