Boa tarde!!

Você quer via VBA, clicar duas vezes (F2 = Editar célula), selecionar parte de um texto e obter o tamanho desse texto selecionado e em qual célula está.

Att

Boa tarde,

Creio que não expliquei direito o que quero. É o seguinte:

- Se tenho na Célula A1 o texto: "Só selecionar uma palavra qualquer do texto";

- E executar a Macro1:

Sub Macro1()
'
' Macro1 Macro
'

'
Range("A1").Select
With ActiveCell.Characters(Start:=19, Length:=7).Font
.Name = "Calibri"
.FontStyle = "Negrito"
.Size = 9
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.Color = -16744448
.TintAndShade = 0
.ThemeFont = xlThemeFontNone
End With
End Sub

- Texto ficará da seguinte forma: "Só selecionar uma palavra qualquer do texto"

- O que eu gostaria de fazer seria ao sair dessa célular, guardar de alguma forma o valor de Start e Length (ActiveCell.Characters(Start:=19, Length:=7)) deste texto que selecionei, para usar-los posteriormente, quando eu voltar para esta célula.