On Tue, 15 Jan 2008 20:29:23 GMT, Yamauchi, Taka**** wrote:
> I wonder if someone can give me some suggestion.
>
> I want to show a label 1 second, and erase it and show it again.
>
> label.visible = true
> pauseme(1000)
> label.visible = false
> pauseme(1000)
> label.visible = true,.....
>
> To show them properly, I used Me.Refresh in VB6. I want to do the
> same thing in Excel VBA. But if I insert Me.Refresh in my VBA code,
> I simply get an error message saying that there is no such function
> Me.Refresh. How can I correct this? How can I show labels,
> pictures, or texts, back and forth on an Excel VBA userform?
>
> Thank you in advance for your help.
You could try something like this:
'it's up to you to determine what exit_condition is
Do Until exit_condition
Label.Visible = Not Label.Visible
t = Now + 1
Application.Wait t 'this might pause the entire app -- not sure
Loop
Instead of Application.Wait, you could also try Sleep + DoEvents.
In the future, I recommend you ask Excel-related questions here:
microsoft.public.excel.programming
--
What you are, not what you have, is what makes you rich.


|