<< Clique para Mostrar o Sumário >>
BlinkValue |
Esta propriedade especifica o valor alternativo (para piscar) da propriedade a ser assumido quando a fonte estiver no intervalo especificado na Linha e a propriedade Blink estiver configurada para Verdadeiro. Exemplo:
Sub CommandButton1_Click()
Dim Cor
' Escolhe uma cor
Application.ShowPickColor Cor, 0, 100, 100
Screen.Item("Retangulo1").Links.Item("ForegroundColor")._
Item(1).BlinkValue = Cor
End Sub