BlinkValue

<< Clique para Mostrar o Sumário >>

 

BlinkValue

Variant 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

Esta página foi útil?