İçindekiler
Önemli bilgileri şurada saklarız Excel Ayrıca gereksinimlerimize göre çeşitli işlemler gerçekleştiririz. Bu nedenle, dosyayı güncelledikten sonra kaydetmek gerekir. Aksi takdirde, bazı değerli verileri kaybedebiliriz. Bunun için bazı etkili yollar vardır Kaydet bir Excel Çalışma Kitabı Dahası, bir tasarruf Excel istediğimiz gibi dosya Biçim veya dosyayı istenilen yerde saklamak Konum Bu makalede, size en yararlı örnekleri göstereceğiz. Excel VBA Dosya Biçimi Olarak Kaydet .
Alıştırma Çalışma Kitabını İndirin
Kendi kendinize pratik yapmak için aşağıdaki çalışma kitabını indirin.
VBA Dosya Biçimi Olarak Kaydet.xlsm12 Excel VBA Dosya Biçimi Olarak Kaydetme Örneği
Örnek olarak aşağıdaki veri kümesini kullanacağız. Örneğin, veri kümesi Satıcı , Ürün ve Net Satışlar Burada, bu çalışma kitabını bir şirketin Excel VBA Dosya Biçimi Olarak Kaydet .
1. Excel Dosyası Olarak Kaydetmek için VBA
İlk örneğimizde, size basit bir VBA Kodu kaydetmek için Excel Bu nedenle, görevi gerçekleştirmek için aşağıdaki adımları izleyin.
ADIMLAR:
- İlk olarak, şu adrese gidin Geliştirici sekmesi.
- Ardından, şunları seçin Visual Basic .
- Sonuç olarak VBA penceresi açılacaktır.
- Bundan sonra, tıklayın Ekleme .
- Daha sonra, aşağıdakileri seçin Modül .
- Bu nedenle Modül penceresi görünecektir.
- Daha sonra, aşağıdaki kodu kopyalayın ve kutuya yapıştırın.
Sub Örnek_1() ActiveWorkbook.SaveAs End Sub 
- Şimdi, şu tuşa basarak kodu çalıştırın F5 .
- Sonuç olarak, dosya adını, biçimini ve diğer bilgileri sorulduğu şekilde girmeniz gerekecektir.
- Son olarak, dosyayı belirttiğiniz konuma kaydedecektir.
Daha fazlasını okuyun: Excel VBA Kullanarak Çalışma Sayfasını Yeni Bir Dosya Olarak Kaydetme
2. Excel VBA ile Dosya Uzantısını Belirtin
Önceki örnekte, manuel olarak Dosya Biçimi Ancak burada, çalıştır komutunu uygulamanın daha etkili bir yolunu göstereceğiz Excel VBA Dosya Biçimi Olarak Kaydet Çalışma kitaplarını istenen formatta kaydetmek için dosya adından sonra dosya uzantısını belirtmemiz yeterlidir. Bu nedenle, aşağıdaki kodu Modül Pencere.
Sub Example_2() Dim location As String location = "D:\SOFTEKO\excel vba save as file format.xlsm" ActiveWorkbook.SaveAs Filename:=location End Sub 
Bu şekilde, dosyayı istediğiniz formatta ve konumda almak için kodu çalıştırabilirsiniz. dosyayı xlsx Formatında kaydedin, tip xlsx yerine xlsm .
Daha Fazla Oku: PDF'yi Belirli Klasöre Kaydetmek için Excel VBA Makrosu (7 İdeal Örnek)
3. Dosya Biçimi Kodunu Kullanmak için Excel VBA
Bununla birlikte, girebiliriz Dosya Formatı Kod Numarası Dosya uzantısını belirtmek yerine Bazı yararlı kodlar şunlardır: .xlsx = 51 , . xlsm = 52 , .xlsb = 50 , .xls = 56 . Bu nedenle, aşağıdaki kodu kopyalayın ve Modül Kutu.
Sub Example_3() Dim location As String location = "D:\SOFTEKO\excel vba dosya biçimi olarak kaydet" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=52 End Sub 
Daha fazlasını okuyun: [Düzeltildi!] Excel Biçimlendirmemi Neden Kaydetmiyor? (7 Olası Neden)
4. VBA ile Aynı Dizine Kaydetme
Bu örnekte, aşağıdakileri nasıl yapacağımızı göstereceğiz Kaydet içinde Aynı Dizin ile dosyanın zaten olduğu yerde Excel VBA . Bu nedenle, kodu Modül Pencere.
Sub Example_4() ActiveWorkbook.SaveAs Dosya Adı:="excel vba dosya biçimi olarak kaydet" End Sub 
Daha fazlasını okuyun: Excel VBA: Konum Seçme ve PDF Olarak Kaydetme
5. Yeni Dizinde Saklamak için VBA
Ancak, dosyayı bir dosyaya da kaydetmemiz gerekebilir Yeni Rehber . Bu nedenle, aşağıdaki kodu Modül kutusunu açın ve çalıştırın.
Sub Example_5() Dim location As String location = "D:\SOFTEKO\excel vba dosya biçimi olarak kaydet" ActiveWorkbook.SaveAs Filename:=location End Sub 
6. Excel Dosyasını Açmak için Parola Sor
Ek olarak, başvurabilirsiniz Excel VBA Dosya Biçimi Olarak Kaydet istemek için Şifre için Excel Dosyasını Aç . Bu yüzden aşağıdaki kodu ekleyin ve çalıştırın.
Sub Örnek_6() ActiveWorkbook.SaveAs _ Dosya Adı:="D:\SOFTEKO\excel vba dosya biçimi olarak kaydet.xlsm", Şifre:="bir" End Sub 
Daha fazlasını okuyun: Excel Dosyası Parola ile Nasıl Kaydedilir
Benzer Okumalar
- Excel VBA ile Dosyayı Değişken Adıyla Kaydetme (5 Örnek)
- 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)
- Excel'de Kaydet Düğmesi için VBA Kodu (4 Varyant)
- [Düzeltildi!] Excel CSV Dosyası Değişiklikleri Kaydetmiyor (6 Olası Çözüm)
7. Excel'de Düzenleme için Parola Ekleme
Dahası, şu taleplerde bulunabilirsiniz Şifre için Düzenleme içinde Excel Şifre olmadan sadece salt okunur formatta açılacaktır. Kodu kopyalayın ve yapıştırın. Ardından kodu çalıştırın.
Sub Example_7() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba dosya biçimi olarak kaydet.xlsm", WriteRes:="bir" End Sub 
8. Salt Okunur Biçimde Açın
Yine, bir dosyayı açmak için Salt Okunur Biçim , aşağıdaki kodu yazın ve tuşuna basın F5 çalıştırmak için.
Sub Example_8() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", _ ReadOnlyRecommended:=True End Sub 
Daha fazlasını okuyun: VBA Excel ile Word Belgesi Açma ve PDF veya Docx Olarak Kaydetme
9. 'Farklı Kaydet' İletişim Kutusunu Oluşturun
Başka bir yararlı işlem Dosya Biçimi Olarak Kaydetmek için Excel VBA üretmektir Farklı Kaydet İletişim Kutusu . Bu nedenle, aşağıdaki kodu ekleyin.
Sub Example_9() Application.GetSaveAsFilename End Sub 
Daha fazlasını okuyun: PDF Olarak Kaydetmek için Excel Makrosu (5 Uygun Örnek)
10. Yeni Çalışma Kitabı Oluşturmak ve Kaydetmek için VBA
Bir dosyayı kaydetmenin yanı sıra şunları da yapabiliriz Yeni Çalışma Kitabı Oluştur & Kaydet ile VBA Görevi gerçekleştirmek için aşağıdaki kodu Modül penceresini açın ve F5 .
Sub Example_10() Dim book As Workbook Set book = Workbooks.Add Application.DisplayAlerts = False book.SaveAs Filename:="D:\SOFTEKO\excel vba save as file format.xlsm" Application.DisplayAlerts = True End Sub 
Daha Fazla Oku: Excel VBA: Sayfayı Açmadan Yeni Çalışma Kitabı Olarak Kaydetme
11. Excel'de Etkin Çalışma Kitabını Kaydetme
Aynı şekilde, aktif çalışma kitabını zaten depolandığı yere kaydedebiliriz. İşlemi gerçekleştirmek için çok basit kodu ekleyin.
Sub Örnek_11() ActiveWorkbook.Kaydet End Sub 
Daha fazlasını okuyun: Excel'de Tüm Çalışma Kitapları için Makro Kaydetme (Kolay Adımlarla)
12. Excel'de PDF Formatında Kaydetmek için VBA
Son olarak, şu komutu kullanabiliriz PDF dosya uzantımızdaki VBA kaydetmek için kod PDF Formatında . Yani, uygula Excel VBA Dosya Biçimi Olarak Kaydet Daha sonra kodu çalıştırmak için F5 .
Sub Örnek_12() ActiveSheet.SaveAs Dosya Adı:="excel vba dosya biçimi olarak kaydet.pdf" End Sub 
Daha fazlasını okuyun: Excel PDF Olarak Nasıl Kaydedilir (6 Faydalı Yol)
Sonuç
Bundan böyle, dosyaları şu şekilde kaydedebileceksiniz Excel VBA Dosya Biçimi Olarak Kaydet Yukarıda açıklanan örnekleri takip edin. Bunları kullanmaya devam edin ve görevi yapmak için daha fazla yolunuz varsa bize bildirin. ExcelWIKI Bunun gibi daha fazla makale için web sitesi. Aşağıdaki yorum bölümünde varsa yorumlarınızı, önerilerinizi veya sorularınızı bırakmayı unutmayın.
