Usei SOMASEJá os adjacentes é só clicar ignorar erro ou tem opções melhores ?

Acabei esquecendo de colocar a linha abaixo rswsAtiva.Range(Cells(1, 5), Cells(1, 11)).Copy: wsAtiva.Range(Cells(Linha + 1, 5), Cells(Linha + 1, 11))....

Não funcionou !

@coutinhoVai ter várias linhas Coloquei 3 para exemploDeu certo !

Nossa, nem reparei que tinha esquecido essas linhas, pois nas outras plans eu coloquei Application.ScreenUpdating = False Application.EnableEvents =...

Funcionou ! Só um detalhe, quando clico nas abas fica ,ou melhor, carregando por de alguns segundos Por causa do For ?

Obrigado, deu certo !

Realmente não está funcionando 100% Quando tem um vazio não funciona, sendo se eu digitar Mauro no lugar desse vazio, não funciona Maria Mauro vazio...