Como contar quebras de linha em uma célula no Excel?

Se o conteúdo for muito longo para caber em uma célula, muitas vezes usamos quebras de linha para que o conteúdo possa ser totalmente exibido dentro da célula, como mostrado na captura de tela abaixo. Você já tentou contar o número de quebras de linha em uma célula?

Contar quebras de linha em uma célula com fórmula

Contar quebras de linha em uma célula com VBA

Contar quebras de linha em uma célula com fórmula

Para contar quebras de linha em uma célula, você pode tentar esta fórmula.

Selecione uma célula ao lado da sequência onde deseja contar as quebras de linha e digite =LEN(A2)-LEN(SUBSTITUTE(A2,CHAR(10),"")), e pressione a tecla Enter Veja a captura de tela:

Observação:

1. Se você estiver usando o sistema Mac, tente esta fórmula =LEN(A2)-LEN(SUBSTITUTE(A2,CHAR(13),""))

2. As fórmulas acima contam apenas as quebras de linha manuais.

Contar quebras de linha em uma célula com VBA

Aqui está um código VBA que também pode contar as quebras de linha em uma célula no Excel.

1. Pressione as teclas Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo, copie e cole o código no Módulo.

VBA: Contar quebra de linha manual

Public Sub CountLines()
'UpdatebyExtendoffice20171222
    Dim xStrLen As Double
    Dim xChrLen As Double
    With Range("A2")
        xStrLen = Len(.Text)
        xChrLen = Len(Replace(.Text, Chr(10), ""))
    End With
    MsgBox "There are " & xStrLen - xChrLen & " line breaks"
End

3. Pressione a tecla F5 Uma caixa de diálogo aparecerá informando o número de quebras de linha.