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)