inverter o texto de trás para frente

Anônima
2010-04-30T19:36:43+00:00

pessoal

como faço para que o texto digitado numa célula apareça escritop de trás para fernte ou seja, do último caractere para o primeiro.

exemplo:

  • BERNARDO
  • ODRANREB
  • MARIA JOSÉ
  • AIRAM ÉSOJ

Como viram se o nome for duplo ou triplo ele esatrá sendo excrito da direita para esquerda em seu posicionamento.

QUEM AJUFA?

GRATO

tack så mycket

Microsoft 365 e Office | Instalar, resgatar, ativar | Para uso doméstico | Outro

Pergunta bloqueada. Essa pergunta foi migrada da Comunidade de Suporte da Microsoft. É possível votar se é útil, mas não é possível adicionar comentários ou respostas ou seguir a pergunta.

0 comentários
Resposta aceita pelo autor da pergunta
Anônima
2010-04-30T23:39:29+00:00

Veja resposta em:

http://info.abril.com.br/forum-antigo/forum.php?topico=151796

PS.: testei e funciona (abaixo replicada)

No Excel digite ALT-F11, vá em Inserir/módulo e digite:

Function inverter(inverte As Variant) As String

Dim txt As String

For i = 0 To Len(inverte) - 1

txt = txt & Mid(CStr(inverte), Len(CStr(inverte)) - i, 1)

Next

inverter = txt

End Function

De volta ao Excel, use a nova função:

=INVERTER(A1)

Esta resposta foi útil?

100+ pessoas acharam esta resposta útil.
0 comentários

36 respostas adicionais

Classificar por: Mais Novo
Mais útil Mais Novo Mais Antigo
  1. Anônima
    2012-03-22T05:58:57+00:00

    Era tudo que eu estava precisando no momento. Obriagado!!!

    Esta resposta foi útil?

    0 comentários
  2. Anônima
    2011-10-27T12:47:31+00:00

    oO funcionou muito bem aqui!!!!

    Depois de usar a função que o amigo jes_kp, podem copiar e colar que funfa!

    façam referência a célula que contém os valores.

    Exemplo:

    Célula A1 contem a palavra etset

    Célula A2 coloque =inverter(A1)

    A Célula A2 retorna teste

    Vlw ae....

    Esta resposta foi útil?

    0 comentários
  3. Anônima
    2011-09-20T22:23:47+00:00

    vlw.. aqui deu certo em um documento que eu mesmo criei!!

    Esta resposta foi útil?

    0 comentários
  4. Anônima
    2011-06-28T20:25:45+00:00

    Alguém sabe se tem como salvar essas linhas de código e eu não precisar abrir o VBA toda vez que for usar essa fórmula no excel?

    Inverter para VBA (Excel):

    Function inverter(inverte As Variant) As String

    Dim txt As String

    For i = 0 To Len(inverte) - 1

    txt = txt & Mid(CStr(inverte), Len(CStr(inverte)) - i, 1)

    Next

    inverter = txt

    End Function

    Esta resposta foi útil?

    0 comentários