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
Bookmarks