Здравейте. Искам да направя макрос за движение на обект в екселска таблица.
Проблема ми е във визуализацията. Обекта се премества, но не се вижда докато тече макроса. Когато дебъгвам стъпка по стъпка всичко е наред, но като стартирам макроса обекта се телепортира в крайната точка.
Ето какво съм направил с цел да забавя процеса, но полза никаква
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

някой да има идея как може да стане

пробвай в цикъла да сложиш
Application.ScreenUpdating=true

мерси много.

Съдържаниет е скрито
Влезте за да го видите

Слагам виртуалната чаша.