Results 1 to 2 of 2

Command Button Blink Color

Threaded View

  1. #1
    Registered User
    Join Date
    03-26-2011
    Location
    portugal
    MS-Off Ver
    Excel 2003
    Posts
    1

    Command Button Blink Color

    Hello i Use excel 2003 with a follow code :

    Private Sub CommandButton1_Click()
    If (CommandButton1.BackColor = &H8000&) Then
        CommandButton1.BackColor = &HFF&
        Sheet2.Cells(2, 3) = "Isco Toxico Consumido"
    ElseIf (CommandButton1.BackColor = &HFF&) Then
        CommandButton1.BackColor = &HFFFF&
        Sheet2.Cells(2, 3) = "Posto de Engodo Inacessivel"
    ElseIf (CommandButton1.BackColor = &HFFFF&) Then
        CommandButton1.BackColor = &H404080
        Sheet2.Cells(2, 3) = "Isco Degradado"
    ElseIf (CommandButton1.BackColor = &H404080) Then
        CommandButton1.BackColor = &H808080
        Sheet2.Cells(2, 3) = "Posto de Engodo Destruido"
    ElseIf (CommandButton1.BackColor = &H808080) Then
        CommandButton1.BackColor = &HFF0000
        Sheet2.Cells(2, 3) = "Isco de Monitorização Intacto"
    ElseIf (CommandButton1.BackColor = &HFF0000) Then
        CommandButton1.BackColor = &H80FF&
        Sheet2.Cells(2, 3) = "Isco de Monitorização Consumido"
    ElseIf (CommandButton1.BackColor = &H80FF&) Then
       CommandButton1.BackColor = &H8000&
        Sheet2.Cells(2, 3) = "Isco Toxico Intacto"
    
        End If
        End Sub
    What i want to make is when i click on the button it change the color and blink to a specified color for example red color
    Last edited by pauloalf; 03-28-2011 at 10:19 AM.

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1