Dosyanızı İstediğiniz Klasöre Yedekleme isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Kod, aktif Excel dosyasının bir kopyasını belirlenen adrese kaydeder. Bu işlem sırasında herhangi bir hata oluşursa (örneğin yazma izinleri yoksa), Excel bir hata mesajı gösterecektir.
Kodu kullanmadan önce, yedekleme işleminin doğru çalıştığından emin olmak için test etmeyi unutmayın!
Faydalanılması temennisiyle
Uygulama Adımları
- Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
- Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
- Araç çubuklarından Insert -> Module yazısına tıklayın.
- Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
- Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
- Alttaki kodu yapıştırın.
Hazır Kod
VBA:
You must log in to view content
(26 satır)Açıklama
Bu kod, kullanıcının bir dosya kaydetme diyalogu aracılığıyla dosyanın yedekleneceği konumu ve adını seçmesini sağlar. Application.GetSaveAsFilename metodu kullanılarak kullanıcıdan dosya adı ve yolu alınır. Eğer kullanıcı işlemi iptal ederse ("False" dönerse), kod sonlanır.Kod, aktif Excel dosyasının bir kopyasını belirlenen adrese kaydeder. Bu işlem sırasında herhangi bir hata oluşursa (örneğin yazma izinleri yoksa), Excel bir hata mesajı gösterecektir.
Kodu kullanmadan önce, yedekleme işleminin doğru çalıştığından emin olmak için test etmeyi unutmayın!
Faydalanılması temennisiyle
