Pode nos disponibilizar seu modelo? Isso ocorre após vc importar um arquivo txt separado por um delimitador paper "|" ?

O ruim é que alguns nomes de escolas podem ficar com o final do nome sem visualizar dentro da célula. Para que isso não ocorra você poderá estar compactando a fonte (somente) da coluna G até caber na célula, ficando assim a rotina; Sub Quebra_de_Texto() 'EXCLUIR QUEBRA AUTOMATICA DE TEXTO Cells.Sele...

Colega Não sei se entendi direito, mas parece que o que vc quer é excluir a quebra de texto, que faz com que a aparência da planilha fique com uma linha a mais. Você pode fazer isso manualmente, selecionando toda a planilha\Formatar Células\Alinhamento, e desmarque a opção Quebrar Texto Automaticame...

Colega, pode anexar seu modelo ou um print?

Colega Bom dia Sem ver sua planilha estamos sujeitos a alguns erros, mas veja se consegue algo com a rotina abaixo. Coloque a rotina abaixo em um módulo e não se esqueça de atribuir o nome da planilha onde estão seus dados, na opção Set ws = Sheets("Planilha1") '---------Nome da planilha onde estão ...

Colega Bom dia Sem ver sua planilha estamos sujeitos a alguns erros, mas veja se consegue algo com a rotina abaixo. Coloque a rotina abaixo em um módulo e não se esqueça de atribuir o nome da planilha onde estão seus dados, na opção Set ws = Sheets("Planilha1") '---------Nome da planilha onde estão ...

Colega

Boa tarde

Não entendi muito bem. Se vc vai selecionar 500 linhas abaixo da última linha preenchida, entende-se que não vai ter nada para ser transportado para outra planilha, pois as células com valores ficaram acima.

Atenciosamente

Tov Elen Shau

Boa tarde

Na guia dados >validação de dados. Veja um tutorial
https://www.aprenderexcel.com.br/2014/a ... -no-excel2

Private Sub UserForm_Initialize()
'Este código faz com que sua textbox receba o valor quando seu
'Useform for iniciado. Mude UserForm_Initialize para nomedoseuformulário_Initialize
Me.TextBox1.Value = Range("A1").Value
End Sub


Atenciosamente

Tov Elen Shau

Boa tarde pessoal, desculpa a demora no feedback, somente hoje pude adaptar a rotina. Julio Mangilli, fiz exatamente o que você sugeriu. Primeiro uma rotina para saber se o arquivo havia sido localizado, se localizado executaria a rotina do Reinaldo. Reinaldo, obrigado pela rotina, inclui ela com os...