|
Тема |
движение на обект |
|
Автор |
nepukis (минаващ) |
|
Публикувано | 07.04.15 10:30 |
|
|
Здравейте. Искам да направя макрос за движение на обект в екселска таблица.
Проблема ми е във визуализацията. Обекта се премества, но не се вижда докато тече макроса. Когато дебъгвам стъпка по стъпка всичко е наред, но като стартирам макроса обекта се телепортира в крайната точка.
Ето какво съм направил с цел да забавя процеса, но полза никаква
Sub Oval2_Click()
ActiveSheet.Shapes("Oval 5").Select
For i = 1 To 10
Selection.ShapeRange.IncrementLeft 78.75
'цикъл за забавяне
For u = 1 To 1000000
Next
Next
End Sub
някой да има идея как може да стане
|
| |
|
|
|