Olá... Geralmente isso ocorre por falta de controle do tempo de execução..... Experimente controlar a execução usando o método sleep antes da linha ...

Cole a linha abaixo em C2. =A2&" ; "&A3&" ; "&A4&" ; "&A5&" ; "&A6&"...

Está com a alteração que vc pediu....... veja se resolveu.... Abs...

Eita q se não for agora eu desisto.. rs... Segue arquivo alterado.... Não esquece de colocar a resposta como tópico resolvido e mandar o tks... Abr...

Segue em anexo conforme solicitado. Não esqueça de marcar a resposta como tópico resolvido e mandar o tks. Abraços

Tá na mão Sub copiadados2() i = 1 s = 1 Do Until Len(Sheets(1).Cells(i, 1).Text) = 0 If Sheets(1).Cells(i, 1).Text = "c...

Coleguinha.... É mais complicado te ajudar sem poder visualizar o arquivo.... De qualquer forma... acabei de testar aqui a rotina usando o replace e...

Bom dia Ancafa... Já pensou em utilizar o replace? Com o replace, ele encontra e substitui o texto de uma string pelo que você definir...... A util...

Boa tarde Felipe.... É um pouco mais complicado analisar o problema apenas visualizando o código, sobretudo quando é um código extenso assim.... Mas...

Opa Joker.... foi mal.. acho que me confundi com seu post.... Ora vc diz que precisa de novas abas... outra hora vc diz precisar salvar a planilha co...

Tá na mão.... Sub copiadados() anterior = "" i = 6 s = 6 Do Until Len(Workbooks("EXEMPLO 1.xlsm").Sheets(1).Cells...

Olá John.... Não entendi bem seu post.... Você está solicitando ajuda para resolver um problema nessa planilha? Caso seja isso, explique melhor o pr...

Tá na mão meu querido.... Se a célula tiver um nome... ele vai gravar o nome da célula.... se não tiver... vai gravar o endereço.... Espero ter aju...

Ele está mandando o texto da variável que você definiu.... Se você trocar o valor da variável... vai mandar o que tiver nela.... Por exemplo... se a...