Changing colors
 

I would like to *continuously*toggle the color of a text string until
certain action is taken.

On a certain userform I have an option button.

When the option button is chosen, a message appears in a text box whic
is previously empty.

Is there a way to change the color of the text back and forth, from sa
black to red to black to red to...., until a specific action is taken?

That is, I want it to *continuously* flicker until another action i
taken, not just red to black.

Using VB6 w/Excel 2000. There is no Timer control. Trust me, I'v
asked before

--
scantor14
-----------------------------------------------------------------------
scantor145's Profile: http://www.excelforum.com/member.php...fo&userid=1476
View this thread: http://www.excelforum.com/showthread.php?threadid=26459

Changing colors
 

hi,
Sub maccolorchange()
Do While IsEmpty(Range("a1"))
If Not IsEmpty(Range("C5")) Then
Range("C5").Font.ColorIndex = 3
Application.Wait (Now + TimeValue("0:00:01"))
Range("C5").Font.ColorIndex = xlAutomatic
Application.Wait (Now + TimeValue("0:00:01"))
End If
Loop
End Sub
but there is no way out that i could find. endless loop.
c
-----Original Message-----

I would like to *continuously*toggle the color of a text
string until a
certain action is taken.

On a certain userform I have an option button.

When the option button is chosen, a message appears in a
text box which
is previously empty.

Is there a way to change the color of the text back and
forth, from say
black to red to black to red to...., until a specific
action is taken?

That is, I want it to *continuously* flicker until
another action is
taken, not just red to black.

Using VB6 w/Excel 2000. There is no Timer control.
Trust me, I've
asked before.


--
scantor145
----------------------------------------------------------
--------------
scantor145's Profile:
http://www.excelforum.com/member.php?
action=getinfo&userid=14766
View this thread:
http://www.excelforum.com/showthread...hreadid=264592

.