Excel de bir nesneyi sürekli döndürmek

[elektrohidroturk]

İyi günler
ben çalıştığım yer ile ilgili excelde ufak bir simulasyon hazırlıyorum
Simulasyonda butona basılınca seçtiğim nesne sürekli dönecek

Bunu
ActiveSheet.Shapes("Çark 1").Select
Selection.ShapeRange.IncrementRotation 10

komutunda sonsuz döngü kullanarak elde ettim , ama bu sefer de sonsuz
döngü oldugu için öteki butonlar, hesaplamalar yapılmıyor.

istedğim şey Örneğin bir şekil sürekli dönecek ama diğer button kontrolleride çalışacak

Yardım edebilirseniz sevinirim

 

[hsayar]

çalıştırmaya başladığınız komutun üzerine do events yazarak deneyiniz.

 

[elektrohidroturk]

Onu denemiştim örneğin çark sürekli dönüyor Butona basınca çark dönmesi durup butondaki kodlar çalılşıyor sonra çark tekrar dönüyor
Butonlara zaman gecikmesi için sleep komutuyla gecikme koymam gerektiği için oluyor bunun için başka bir yol varmıdır?

 

[Levent Menteşoğlu]

Aynı anda birden fazla kodu çalıştıramazsınız.