Este fórum está sendo desativado

[Lucgenaro]

Bom dia amigos, seguinte, estou com uma planilha com mais de 35 mil itens, em que preciso juntar a coluna "descrição" e "aplicação" e separá-las por "/" ou seja:

descrição: Capô
Aplicação: Ford Ka 2009

Preciso de uma fórmula ou de algum método que deixe todas as minhas descrições:
Capô/Ford Ka 2009 na mesma coluna.

Segue um anexo curto de como está e de como eu preciso que seja, lembrando que ali tem alguns, porém minha tabela original tem mais de 35 mil itens, fico no aguardo e desde já agradeço"

[FelipeMGarcia]

Lucgenaro,

Veja se isto é o que você precisa, eu coloquei a fórmula na coluna E.

[CAMPOS159]

Bom dia!

Basta utilizar a Função CONCATENAR.

=CONCATENAR(A1;" / ";B1)

Você poderá utilizar a mesma função com várias colunas.

Anexei a mesma planilha com a solução.

[Kledison]

Bom dia,

para o que você precisa é usar a concatenação.

veja no exemplo.

[Lucgenaro]

Lucgenaro,

Veja se isto é o que você precisa, eu coloquei a fórmula na coluna E.

Obrigado por responder Felipe,

Porém na verdade não, eu já tentei usar essa função, porém eu não posso abrir outra coluna na tabela, pois ela será jogada dentro do meu sistema, ou seja,não posso alterar a estrutura original. Então eu preciso de uma função que adicione o conteúdo da "aplicação" na "descrição" sem que faça nenhuma alteração na original, o que não torna possível a concatenação nesse formato. Alguma outra sugestão?

[Lucgenaro]

Bom dia!

Basta utilizar a Função CONCATENAR.

=CONCATENAR(A1;" / ";B1)

Você poderá utilizar a mesma função com várias colunas.

Anexei a mesma planilha com a solução.

Obrigado por responder Campos,

Porém na verdade não, mas como disse ao Felipe eu já tentei usar essa função, porém eu não posso abrir outra coluna na tabela, pois ela será jogada dentro do meu sistema, ou seja,não posso alterar a estrutura original. Então eu preciso de uma função que adicione o conteúdo da "aplicação" na "descrição" sem que faça nenhuma alteração na original, o que não torna possível a concatenação nesse formato. Alguma outra sugestão?

[Lucgenaro]

Bom dia,

para o que você precisa é usar a concatenação.

veja no exemplo.

Obrigado por responder Kledison,

Porém na verdade não, como disse acima aos outros, eu já tentei usar essa função, porém eu não posso abrir outra coluna na tabela, pois ela será jogada dentro do meu sistema, ou seja,não posso alterar a estrutura original. Então eu preciso de uma função que adicione o conteúdo da "aplicação" na "descrição" sem que faça nenhuma alteração na original, o que não torna possível a concatenação nesse formato. Alguma outra sugestão?

[Kledison]

Olá,

outra sugestão seria usar VBA, verifique o anexo.

No aguardo.

[orosolin2]

Olá @Kledison, muito boa sua solução! Se o @Lucgenaro não pode incluir uma nova coluna, a única forma é que vejo é essa mesmo, de utilizar VBA.

@Lucgenaro, só tome cuidado, pois cada vez que você rodar a macro, será feita uma concatenação. Talvez quando usar a solução do @Kledison, faça também um procedimento de remoção da concatenação antes de executá-la ou um teste de concatenar apenas aquilo que não foi concatenado.

Ex.: Sugiro fazer um teste lógico da seguinte forma : se os n últimos caracteres da [descrição] forem o mesmo que da [aplicação] incluindo a barra " / " então não pule para o próximo.

@Kledison, tomei a liberade de incluir no seu código esse tratamento. Espero que não se importe .

Código: Selecionar todos

For iNumero = 1 To UBound(vaColuna1)
    If Not Right(vaColuna1(iNumero, 1), Len(" / " & vaColuna2(iNumero, 1))) = " / " & vaColuna2(iNumero, 1) Then
        vaDados(iNumero) = vaColuna1(iNumero, 1) & " / " & vaColuna2(iNumero, 1)
    Else
        vaDados(iNumero) = vaColuna1(iNumero, 1)
    End If
Next iNumero

[Kledison]

Orosolin2,

obrigado pelo código, fiz a alteração no anexo.

Att

[Lucgenaro]

Obrigado pelas ajudas @Kledison e @orosolin2, nesse seu exemplo com essa macro deu certo, porém quando quis aplicá-la em minha tabela original deu erro, talvez seja porque elas sejam de tamanhos diferentes, o que alteraria a posição das informações na tabela.

O erro foi:
Erro em tempo de execução "9"
Subscrito fora do intervalo

Nesse caso enviei em anexo uma amostra mais curta de minha tabela original, ficaria muito grato caso possam me orientar em como posso deixar esse código macro para funcionar em minha tabela original.

Obrigado, vocês são fera!

[Kledison]

Boa noite,

esse erro aconteceu porque no exemplo que mandei a aba com os dados estava em Plan2, nesse modelo que você enviou está em Plan1.

Segue anexo planilha com o código utilizado, acrescentei a opção de concatenar toda vez que a planilha for ativada, assim não precisa clicar no botão, caso não queira essa opção entre no VBA (alt + F11) e remova a chamada do código no módulo de dados da Plan1.

Att