O comando para limpar a célula foi colocado como: Activecell.Clearcontents Activecell.Offset(0,2).Clearcontents Não poderia ser somenteo seguinte abaixo?: Activecell.Offset(0,2).Clearcontents
O comando para limpar a célula foi colocado como: Activecell.Clearcontents Activecell.Offset(0,2).Clearcontents Não poderia ser somenteo seguinte abaixo?: Activecell.Offset(0,2).Clearcontents
Ele limpa tanto a célula ativa atualmente, pq ele escreveu nela o nome do aluno, e limpa a célula 2 colunas para a direita, onde ele escreveu o estado.
Por isso ele faz dois comandos.
Se fosse só o segundo comando, ele limparia apenas o estado.