Mouse imleci Kum saati şekline dönüşsün.

[Orion1]

Mrb.
Commandbutton 'da 1 den 5000'e kadar bir döngü yaptım.
Döngü başlangıcından ,döngü sonuna kadar Mouse imlecinin kum saati şeklini almasını ,döngü bittikten sonra mouse imlecinin tekrar döngü başlamazdan önceki Mouse imlecine dönüşmesini istiyorum.
Teşekkür ederim.
İyi çalışmalar.

 

[Haluk]

[vb:1:6fb2f0f12b]Private Sub CommandButton1_Click()
Application.Cursor = xlWait
For i = 1 To 10000000
i = i + 1
Next
Application.Cursor = xlDefault
End Sub
[/vb:1:6fb2f0f12b]

 

[Orion1]

[vb:1:41e71226f0]Private Sub CommandButton1_Click()
Application.Cursor = xlWait
For i = 1 To 10000000
i = i + 1
Next
Application.Cursor = xlDefault
End Sub
[/vb:1:41e71226f0]

-----------------------------------------------------------------

Mrb.
Sn.Raider
Gönderdiğiniz vb kodu için teşekkür ederim.
İyi çalışmalar.
:hey: