Olá,

Esta área é para VBA, caso tenha se equivocado e queira apenas uma fórmula...considerando que o texto esteja na célula A1, insira a fórmula abaixo onde desejar.

=DIREITA(A1;NÚM.CARACT(A1)-PROCURAR("-";A1)-1)

Boa sorte.

gostaria que fosse em VBA, porque irá aparecer números sem o "-" e pode aparecer o "-".

posso encontrar assim DEP RECUR PROC. 0000/10-VALDECIR RENKAVESKI
posso encontrar assim DEP-RECUR-PROC. 0000/10VALDECIR RENKAVESKI

mas quero quer apareça somente o nome VALDECIR RENKAVESKI, na primeira linha tenho um "-' e na segunda antes do nome ja aparece o número.

valdecirrk o q vc quer fazer pode ser feito tranquilamente com o uso de funções, foi por isso q o luizhcosta montou a fórmula p/ vc.
Se seus dados tem algumas particularidades anexe sua planilha explicando onde quer o resultado final.
Muitas vezes é possível fazer bem mais coisas do q vc imagina ser possível, mas p/ isso temos q analisar sua planilha. Por exemplo, muitas vezes é possível puxar os dados direto da internet...

Segue sugestão com UDF (Função definida pelo usuário):

Function SONOME(rng As Range) As String

nome = ""
texto = rng.Value
t = Len(texto)
Do While Mid(texto, t, 1) <> "-" And IsNumeric(Mid(texto, t, 1)) = False
nome = Mid(texto, t, 1) & nome
t = t - 1
Loop

SONOME = nome

End Function