Makronuz çalışırken ekran titriyor, gidip geliyor ve işlem uzun sürüyorsa, Excel her adımı ekrana çizmeye çalışıyor demektir. Bunu kapatarak makroyu 10 kat hızlandırabilirsiniz.
Hızlandırma Kod Bloğu
Sub HizliMakro()
Application.ScreenUpdating = False 'Ekranı dondur
Application.Calculation = xlCalculationManual 'Hesaplamayı durdur
'... Sizin Kodlarınız ...
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True 'Ekranı aç
End Sub
Application.ScreenUpdating = False 'Ekranı dondur
Application.Calculation = xlCalculationManual 'Hesaplamayı durdur
'... Sizin Kodlarınız ...
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True 'Ekranı aç
End Sub
Kullanıcı sadece sonucun bittiğini görür, ara işlemleri görmez.
Henüz yorum yapılmamış. İlk yorumu sen yap!
Yorum Yap