Excel VBA - Alterar cor da fonte inserida em uma forma

[BEDS87]

Bom dia a todos,

 

Em uma linha do macro que estou fazendo, preciso que alguns retângulos mudem da cor azul escuro para cinza, problema que a fonte usada no texto inserido neles é branco, então fica difícil de ler. Por isso queria saber qual o código para alterar a cor da fonte de uma forma ("desenho").

 

Eu sei que para mudar a cor de preenchimento da forma é:

ActiveSheet.Shapes("Retângulo 1").Line.ForeColor.RGB = RGB(255, 255, 255)

 

E se fosse para alterar a cor da fonte de uma célula, seria:

Range ("A1"). Font.Color = RGB (255, 255, 255)

Porém esse código não funciona em formas.

 

Aqui uma imagem dos retângulos para exemplificar:

 

Alguém pode me ajudar? 

 

Att,

 

[BEDS87]

Resolvido:

 

ActiveSheet.Shapes("Retângulo 1").TextFrame.Characters.Font.Color = RGB(255, 255, 255)