Veri kaydı yavaşlama

[feryat]

Kurutemizleme ve terzi işletmem için bir program üzerinde çalışıyorum.
Veri kaydetmek için kullandığım kodu başka bir dosyada kullandığımda çok hızlı olduğu halde hazırladığım programda kullandığımda inanılmaz yavaş kalıyor.
Yavaşlamaya neden olan şeyi bir türlü bulamadım. Dosyaya bakıp öneride bulunur musunuz.

 

[Korhan Ayhan]

Merhaba,

İşlemi hızlandırma için aşağıdaki yapıyı kullanabilirsiniz.

Sub Örnek()
    Application.ScreenUpdating = False
    Application.Calculation = xlCalculationManual
    
    'Kayıt işlemini yapan kodlarınızı bu ara bölümü yazınız.
 
    Application.Calculation = xlCalculationAutomatic
    Application.ScreenUpdating = True
End Sub

 

[feryat]

İnanılmaz farketti. Çok teşekkür ediyorum.