View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Jacob Skaria Jacob Skaria is offline
external usenet poster
 
Posts: 8,520
Default blinking/flashing objects

Hi Alberto

Try the below...

Private Sub Workbook_Open()
StartBlink
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Cancel = Not blnClose
If Cancel = False then StopBlink
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"Alberto Ast" wrote:

Are you familiar with this code? it works but it is making conflict with
anotehr code I already have on This Worksheet View code

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Cancel = Not blnClose
End Sub

Do you know how can I fix this conflict... Chip P routine has on same view
code as follows

Private Sub Workbook_Open()
StartBlink
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
StopBlink
End Sub

which cause conflict.



"Gord Dibben" wrote:

Use an ontime macro to change the color every second or half second.

See Chip Pearson's site for blinking text code.

http://www.cpearson.com/excel/BlinkingText.aspx

Adapt that code to your drawing object.


Gord Dibben MS Excel MVP



On Sat, 19 Sep 2009 18:58:01 -0700, Alberto Ast
wrote:

How can I make an object from the drawing toolbox bar to blink/flash?