Localize e substitua barras por novo feedback no Excel 2010

Question

Alguém pode me dizer como substituir uma barra (/) por um avanço de linha no Excel 2010? Eu tenho uma planilha muito longa com palavras, origens e definições. Na coluna de origens, algumas linhas mostram vários locais separados por barras. Eu quero que cada item na célula esteja em uma nova linha dentro da célula. Isso é possível?

Neste momento, o celular parece com isso

Romano / Celta / Báltico

Eu quero que o celular se pareça com isso

Romano
  Celtic
  Báltico

    

Answer 1

• selecione suas células
• clique com o botão direito, Format Cell s ... vá para a aba Alinhamento e confira Wrap Text (Pic 1)
• pressione ctrl f juntas
• vá para a guia Substituir
• em Find What insira "/"
• goto Replace With , em seguida, pressione alt 0010
• Replace All (Pic 2)

Pic 1

Pic2

    

Answer 2

Como outra opção, aqui está um código VBA para fazer uma nova função que irá converter / para LF:

Public Function SlashToLF(oldstring As String) As String
    Dim newString As String
    Dim c As Long

    For c = 1 To Len(oldstring)
        If Mid(oldstring, c, 1) = "/" Then
            newString = newString & vbNewLine
        Else
            newString = newString & Mid(oldstring, c, 1)
        End If
    Next
    slashtolf = newString

End Function

Se você colocar a fórmula =SlashToLF(A1) em outra célula, obterá a nova versão com feeds de linha. Você pode então copiar / colar como valores sobre o original, se quiser. Além disso, você precisará formatar a célula como Wrap Text para que ela funcione.