Kod hata vermesi halinde işlemi geri alma

[kemal turan]

Merhaba ustalarımız
Örnek olarak kod çalışıyor bir takım kayıtlar yapıyor, fakat kodun yarısında hata veriyor.
Hata verene kadar yapılan kayıtları geri alabilirmiyiz.
Teşekkür ederim

 

[Korhan Ayhan]

Merhaba,

Makro ile yapılan işlemler geri alınamıyor. Bunun yerine yazdığınız koda hata kontrolleri ekleyebilirsiniz. Böylece makronuzun hatasız çalışmasını sağlarsınız.

Ya da şu şekilde yapabilirsiniz. Kod ilk çalışmaya başladığında dosyanızı kayıt edersiniz. Bu şekilde son hali ile kayıt edilmiş olur. Kodu çalıştırdığınızda ve hata verdiğinde dosyayı kaydetmeden kapanmasını sağlarsınız. Bu şekilde işlemler geri alınmış olur.

 

[kemal turan]

Korhan hocam
Çok teşekkür ederim
Selametle kalınız

 

[kemal turan]

Korhan hocam
Kod hata verdiğinde çalışma kitabını kaydetmeden kapatacak kodu rica edebilirmiyim.

 

[Korhan Ayhan]

Aşağıdaki kodlardan birisini kullanabilirsiniz.

Sub Test()
    ThisWorkbook.Close False
End Sub

Sub Test()
    ActiveWorkbook.Close False
End Sub

 

[kemal turan]

Korhan hocam
If şartı olacak herhalde çünki hata vermezse kapatmacak.
Örnek aşağıdaki kodun sonuna mı kodunuzu koyacağım

Sub kaydet ()
Kodlarımız....
End sub

 

[Korhan Ayhan]

Örnek;

Sub Kaydet()
    On Error GoTo Son
    'Kodlarınız...
    'Kodlarınız...
    'Kodlarınız...
    
Son:
    ThisWorkbook.Close False
End Sub

 

[kemal turan]

Korhan hocam
Teşekkür ediyorum