Hi Guys
I've written the below, but I'm clearly not doing something right.
I've got a userform with 9 image boxes in it, each of them starts blank (blended with the form background) and then each second one colours itself blue until all 9 are complete and then it closes.
I actually need different timescales, but for testing purposes seconds are fine.
Ultimately, this userform will pop up and start it's "animation" while an entirely seperate script runs in the background of Excel.
Could someone point out what I'm not doing right please?
this is in the userform code
[VBA]
Private Sub userform_activate()
Application.OnTime Now + TimeValue("0:00:01"), Name:="First"
Application.OnTime Now + TimeValue("0:00:02"), Name:="second"
Application.OnTime Now + TimeValue("0:00:03"), Name:="third"
Application.OnTime Now + TimeValue("0:00:04"), Name:="fourth"
Application.OnTime Now + TimeValue("0:00:05"), Name:="fifth"
Application.OnTime Now + TimeValue("0:00:06"), Name:="sixth"
Application.OnTime Now + TimeValue("0:00:07"), Name:="seventh"
Application.OnTime Now + TimeValue("0:00:08"), Name:="eighth"
Application.OnTime Now + TimeValue("0:00:09"), Name:="ninth"
Unload waitingform
End Sub
[/VBA]
this (and others like it) are in a seperate module
[VBA]Sub first()
Image1.BackColor = vbBlue
End Sub[/VBA]
I'm just bashing my head against a wall now and am probably just tying myself in knots.
Any help will be greatly appreciated.
Phel