Erro ao concatenar células

Question

Estou tentando a função "concatenar", seguindo os seguintes passos:

-Seleciono uma célula extra numa coluna separada.

-Clico sobre as células que quero concatenar.

-Erro: Nome inválido.

= CONCATENAR A2;B2;C2;D2;E2;F2;G2;H2;I2;J2;K2;L2;M2;N2;O2;P2;Q2;R2;S2;T2;U2;V2;W2;X2;Y2;Z2;AA2;AB2;AC2;AD2;AE2;AF2

PS.: Não funciona com parênteses. Ex.: = CONCATENAR (A2;B2;C2;D2;E2;F2;G2;H2;I2;J2;K2;...)

Também não funciona o comando = A2&B2&C2&...

Answer 1

@José

 

cara o limite de agrupamento de texto da função concatenar é de 255 caracteres (espaço conta também), deve ser esse o problema, texto muito longo.

Agr

O limite de 255caracteres é por celula, O problema está mesmo na formula que tem espaços. Acima eu postei a formula correcta(sem espaços)

Um Abraço,

Jimmy C.

Answer 2

Ola José,

a formula está correcta. O problema aí esta só nos espaços ~que estáo a mais..

Fica entao:

=CONCATENAR(A2;B2;C2;D2;E2;F2;G2;H2;I2;J2;K2;L2;M2;N2;O2;P2;Q2;R2;S2;T2;U2;V2;W2;X2;Y2;Z2;AA2;AB2;AC2;AD2;AE2;AF2)

Espero ter ajudado,

Jimmy C.

Answer 3

José,

Uma alternativa é usar esta função

Function aconcat(a As Variant, Optional sep As String = "") As String

' Harlan Grove, Mar 2002

    Dim y As Variant

    If TypeOf a Is Range Then

        For Each y In a.Cells

            aconcat = aconcat & y.Value & sep

        Next y

    ElseIf IsArray(a) Then

        For Each y In a

            aconcat = aconcat & y & sep

        Next y

    Else

        aconcat = aconcat & a & sep

    End If

    aconcat = Left(aconcat, Len(aconcat) - Len(sep))

End Function

Aí vc não precisa ficar selecionando cada célula da faixa (range) A2:AF2. Chato e sujeito a erros...

Basta colocar na célula onde vc quer o resultado

=aconcat(A2:AF2)

Vc ainda pode escolher o separador (default é "")

Espero que ajude

M.

Answer 4

José,

Não faltou colocar os parênteses?

= CONCATENAR**(A2;B2;C2;D2;E2;F2;G2;H2;I2;J2;K2;L2;M2;N2;O2;P2;Q2;R2;S2;T2;U2;V2;W2;X2;Y2;Z2;AA2;AB2;AC2;AD2;AE2;AF2)**

M.