ViniciuZ

Olá galera, Tenho o seguinte problema: Na tabela acima as células B1:D5 receberá de outra tabela os nomes completo, mas precisarei somente do último nome, essa macro abaixo se executada manualmente funciona, mas precisaria que ela fosse automática, que quando fosse colado inteiro a macro já detectasse e ativasse essa macro pra separar o nome. Obs.: Os dados vão sendo preenchido a cada semana. Na tabela acima, a coluna C já tem seus valores disponíveis, mas para separar eu teria q executar a macro. Macro: Separar Sub Separar() Selection.TextToColumns Destination:=Selection, DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, _ Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _ :=Array(Array(1, 9), Array(2, 1)) End Sub Agradeço desde já, Vinícius