Olá, Maria! Como vai?
Parabéns pela resolução da atividade!
Observei que você aplicou corretamente o laço For para percorrer os registros, utilizou de forma adequada a função Right para extrair parte do texto e ainda demonstrou entendimento sobre o uso do Range dinâmico para automatizar a manipulação dos dados na planilha.
Permaneça postando as suas soluções, com certeza isso ajudará outros estudantes e tem grande relevância para o fórum.
Fico à disposição! E se precisar, conte sempre com o apoio do fórum.
Abraço e bons estudos!