Excel VBA: Çalışma Kitabını Kaydetme ve Kapatma (5 Uygun Örnek)

  • Bunu Paylaş
Hugh West

Bu makalede size şunları göstereceğiz 5 kullanma yöntemleri Excel VBA için Kaydet ve Çalışma Kitabını Kapat Zaman çok değerli olduğundan, sıradan görevleri atlayarak çok fazla zaman kazanabiliriz. Excel VBA 'den oluşan bir veri seti aldık. 3 sütun : " İsim ", " Doğan ", ve " Son Çalışmalar "Bu veri kümesi 6 insanların doğum yılı ve son film bilgileri.

Alıştırma Çalışma Kitabını İndirin

Çalışma Kitabını Kaydetmek ve Kapatmak için VBA.xlsm

5 Excel'de VBA Kullanarak Çalışma Kitabını Kaydetme ve Kapatma Örnekleri

1. Excel VBA Kullanarak Etkin Çalışma Kitabını Kaydetme ve Kapatma

İlk yöntem için şunları yapacağız Kaydet ve Kapat ve Aktif Çalışma Kitabı kullanarak VBA Makro . Biz getireceğiz VBA Modülü penceresini açın, kodumuzu yazın ve ardından hedefimize ulaşmak için kodu çalıştırın. Daha fazla uzatmadan, adım adım prosedüre geçelim.

Adımlar:

Kodumuzu yazmadan önce VBA Modülü . Bunu yapmak için -

  • İlk olarak Geliştirici sekmesi>>> seçin Visual Basic .

Alternatif olarak ALT + F11 Bunu da yapmak için " Microsoft Visual Basic Başvuru için " bundan sonra görünecektir.

  • İkinci olarak Ekleme >>> seçin Modül .

Burada kodumuzu yazacağız.

  • Üçüncü olarak, aşağıdaki kodu Modül .
 Sub Save_and_Close_Active_Workbook() ActiveWorkbook.Close SaveChanges:=True End Sub 

VBA Kod Dökümü

  • İlk olarak, bizim Alt Prosedür Kaydet_ve_Kapat_Aktif_Çalışma Kitabı .
  • O zaman, mevcut durumumuza atıfta bulunuyoruz Çalışma Kitabı olarak ActiveWorkbook .
  • Bundan sonra, kullanarak Kapat yöntemimiz kapanış bizim dosyamız.
  • Son olarak şunları belirledik SaveChanges için Doğru kurtaracak olan Çalışma Kitabı üzerine kapanış .

Şimdi kodumuzu çalıştıracağız.

  • Birincisi, Kaydet Bu Modül .
  • İkinci olarak, kodumuzun içine tıklayın.
  • Son olarak, tuşuna basın. Koşmak Düğme.

Eğer bizim Excel Uygulaması göreceğiz. Çalışma Kitabı Böylece, başarılı bir şekilde kaydedildi ve kapalı ve Çalışma Kitabı kullanarak Excel VBA .

Daha fazlasını okuyun: Excel'de Tüm Çalışma Kitapları için Makro Kaydetme (Kolay Adımlarla)

2. Belirli Çalışma Kitabını Kaydetmek ve Kapatmak için Excel VBA

İkinci yöntem için şunları kullanacağız Kaydet ve Kapat belirli bir Çalışma Kitabı başka bir VBA Burada iki tane kod açtık. Çalışma Kitapları ve biz Kaydet ve Kapat ilk Çalışma Kitabı sol taraftan.

Adımlar:

  • Birincisi, yöntem 1'de gösterildiği gibi , getir VBA Modülü .
  • İkinci olarak, bu kodu içine yazın Modül .
 Sub Save_and_Close_Specific_Workbook() Workbooks("Macro Save and Close.xlsm").Close SaveChanges:=True End Sub 

VBA Kod Dökümü

  • İlk olarak, bizim Alt Prosedür Kaydet_ve_Kapat_Belirli_Çalışma Kitabı .
  • O halde, ilk olarak Çalışma Kitabı içinde Çalışma Kitapları nesnesi .
  • Bundan sonra, kullanarak Kapat yöntemimiz kapanış bizim dosyamız.
  • Son olarak şunları belirledik SaveChanges için Doğru kurtaracak olan Çalışma Kitabı üzerine kapanış .
  • Üçüncüsü, yöntem 1'de gösterildiği gibi kodu çalıştırın.

Bundan sonra göreceğiz ki, ilk Çalışma Kitabı o kapalı ve sadece ikinci Çalışma Kitabı o açık Bu nedenle, size başka bir yöntem daha gösterdik. tasarruf ve kapanış a Çalışma Kitabı .

Daha fazlasını okuyun: Excel VBA: Sayfayı Açmadan Yeni Çalışma Kitabı Olarak Kaydetme

3. Belirli Çalışma Kitabını Belirli Klasöre Kaydetme ve Kapatma

Üçüncü yöntem için şunları yapacağız Kaydet ve Kapat a Özel Çalışma Kitabı bir klasör kullanarak Excel VBA .

Adımlar:

  • Birincisi, yöntem 1'de gösterildiği gibi , getir VBA Modülü .
  • İkinci olarak, bu kodu içine yazın Modül .
 Sub Save_and_Close_Workbook_in_Specific_Folder() Workbooks("Macro Save and Close.xlsm").SaveAs _ Filename:="C:\Users\Rafi\OneDrive\Desktop\Exceldemy\Macro Save and Close.xlsm" Workbooks("Macro Save and Close.xlsm").Close End Sub 

VBA Kod Dökümü

  • İlk olarak, bizim Alt Prosedür Belirli_Klasörde_Çalışma_Kitabını_Kaydet_ve_Kapat .
  • Bundan sonra, kullanarak SaveAs yöntemimiz tasarruf dosyamız belirli bir konumda.
  • Ardından, dosya adını orijinaliyle aynı tutarız Çalışma Kitabı .
  • Son olarak, biz Kapat bizim Çalışma Kitabı .
  • Üçüncüsü, yöntem 1'de gösterildiği gibi kodu çalıştırın.

Bundan sonra Kaydet bizim Çalışma Kitabı tanımlı klasör konumumuzun içinde ve Kapat Böylece, size başka bir yöntem göstermiş olduk. tasarruf ve Kapanış Çalışma Kitabı bir özel klasör kullanarak VBA .

Daha fazlasını okuyun: PDF'yi Belirli Klasöre Kaydetmek için Excel VBA Makrosu (7 İdeal Örnek)

Benzer Okumalar

  • Excel VBA: Çalışma Kitabını Komut İstemi Olmadan Kaydetme (Kolay Adımlarla)
  • [Düzeltildi!] Excel Biçimlendirmemi Neden Kaydetmiyor? (7 Olası Neden)
  • Excel PDF Manzarası Olarak Nasıl Kaydedilir (Hızlı Adımlarla)
  • Hücreden Yol Kullanarak Dosya Olarak Kaydetmek için Excel VBA (Hızlı Adımlarla)
  • [Düzeltildi!] Excel CSV Dosyası Değişiklikleri Kaydetmiyor (6 Olası Çözüm)

4. Excel'de Çalışma Kitabını Kaydetmek ve Kapatmak için Düğme Ekleme

Dördüncü yöntem için, bir VBA düğmesi Excel'de Çalışma Kitabını kapatmak ve kaydetmek için.

Adımlar:

  • Birincisi, yöntem 1'de gösterildiği gibi , getir VBA Modülü .
  • İkinci olarak, bu kodu içine yazın Modül .
 Sub Button_Click_Save_and_Close_Workbook() ThisWorkbook.Save Application.Quit End Sub 

VBA Kod Dökümü

  • İlk olarak, bizim Alt Prosedür Button_Click_Save_and_Close_Workbook .
  • Bundan sonra, kullanarak Kaydet yöntemimiz tasarruf Çalışma Kitabımız
  • Son olarak, biz Kapat bizim Çalışma Kitabı kullanarak Bırak yöntem.

Şimdi, aşağıdaki VBA buradaki düğme.

  • İlk olarak Geliştirici sekme>>> Ekleme >>> seçin Düğme (Form Kontrolü) .

  • Ardından, fare imleci değişecek ve bir kutuyu Çalışma Kitabı .

Bundan sonra Makro Ata iletişim kutusu görünecek.

  • Ardından, " Button_Click_Save_and_Close_Workbook ".
  • Bundan sonra, tuşuna basın TAMAM. .

O zaman, göreceğiz Düğme 1 içinde Çalışma Kitabı .

  • Son olarak, düğmeye tıklayın.

Bu olacak Kaydet ve Kapat bizim Çalışma Kitabı .

Daha fazlasını okuyun: Excel'de Kaydet Düğmesi için VBA Kodu (4 Varyant)

5. Excel VBA Uygulayarak Tüm Açık Çalışma Kitaplarını Kaydetme ve Kapatma

Bu son yöntemde, açılan tüm dosyaları kaydedip kapatacağız Çalışma Kitapları Bu sefer de aynı iki kişi var. Çalışma Kitapları yöntemde olduğu gibi 3 ancak, bu sefer, biz Kaydet ve Kapat her ikisi de Çalışma Kitapları Burada şunları kullanacağız Sonraki İçin Döngüsü bizim Çalışma Kitapları .

Adımlar:

  • Birincisi, yöntem 1'de gösterildiği gibi , getir VBA Modülü .
  • İkinci olarak, bu kodu içine yazın Modül .
 Sub CloseAndSaveOpenWorkbooks() Dim z As Workbook With Application For Each z In Workbooks With z If Not z.ReadOnly Then .Save End If If .Name ThisWorkbook.Name Then .Close End If End With Next z .Quit End With End Sub 

VBA Kod Dökümü

  • İlk olarak, bizim Alt Prosedür Çalışma Kitaplarını KapatveKaydet .
  • Daha sonra, bir Sonraki Döngü İçin tüm döngüler için Çalışma Kitapları .
  • Bundan sonra, kullanarak Kaydet yöntemimiz tasarruf dosyalarımız.
  • O zaman, biz Kapat tüm Çalışma Kitapları mevcut durumumuz hariç Çalışma Kitabı .
  • Son olarak, elimizde kapalı orijinal Çalışma Kitabı kullanarak Bırak mülk.
  • Üçüncüsü, yöntem 1'de gösterildiği gibi kodu çalıştırın.

Bu nedenle, bu Kaydet ve Kapat iki Çalışma Kitapları . Görebiliyoruz tarih değiştirildi ikisi için aynıdır Çalışma Kitapları Sonuç olarak şunu gösterdik 5 farklı Excel VBA Makroları için Kaydet ve Çalışma Kitabını Kapat .

Daha fazlasını okuyun: Makro Kişisel Makro Çalışma Kitabına Nasıl Kaydedilir?

Sonuç

Size gösterdik 5 hızlı ve kolay anlaşılır Excel VBA için Kaydet ve Çalışma Kitabını Kapat Herhangi bir sorunla karşılaşırsanız, aşağıya yorum yapmaktan çekinmeyin. Ayrıca, sitemizi ziyaret edebilirsiniz Exceldemy daha fazlası için Excel ile ilgili makaleler. Okuduğunuz için teşekkürler, başarılı olmaya devam edin!

Hugh West, sektörde 10 yılı aşkın deneyime sahip oldukça deneyimli bir Excel eğitmeni ve analistidir. Muhasebe ve Finans alanında lisans derecesine ve İşletme alanında yüksek lisans derecesine sahiptir. Hugh öğretme tutkusuna sahiptir ve takip etmesi ve anlaması kolay benzersiz bir öğretim yaklaşımı geliştirmiştir. Excel konusundaki uzman bilgisi, dünya çapında binlerce öğrencinin ve profesyonelin becerilerini geliştirmesine ve kariyerlerinde başarılı olmasına yardımcı olmuştur. Hugh, blogu aracılığıyla bilgisini dünyayla paylaşıyor, bireylerin ve işletmelerin tam potansiyellerine ulaşmalarına yardımcı olmak için ücretsiz Excel eğitimleri ve çevrimiçi eğitimler sunuyor.