SaberExcel - o site das macros
Sobrescrever a última letra da palavra.
Essa macro do Aplicativo Microsoft Excel VBA, sobrescreve última letra de uma palavra em uma determinada célula, mas nesse caso fica sensibilizada a célula ativa.
Sub Sobrescrever_ultima_letra()
vBusca = Len(ActiveCell.Value)
ActiveCell.Characters(Start:=vBusca, Length:=1).Font.Superscript = True
End Sub
Aplicativo Microsoft Excel VBA --(( SaberExcel ))--
Baixe e exemplo de planilha da macro acima
Excel planihla vba texto macro insere sobrescrito ultima letra celula ativa (16.06 kB)