Vba kullanarak yeni bir excel çalışma kitabı nasıl oluşturulur?
VBA kullanarak yeni bir çalışma kitabı oluşturmak için “Workbooks.Add” yöntemini kullanmanız gerekir. Bu yöntemi kullandığınızda, yeni bir çalışma kitabı ekler (kaydetmeden) ve ardından onu etkinleştirir. Bu, CONTROL + N klavye kısayoluna bastığınızda olduğu gibi çalışır. Yeni bir çalışma kitabı eklemek için bir şablon da kullanabilirsiniz.
VBA’yı kullanarak yeni bir çalışma kitabı oluşturma
Bu kodu VBE’ye girmek için Geliştirici sekmesini şeride eklediğinizden emin olun.
- Ciltleyici nesneye atıfta bulunmak için “Bağlayıcılar” anahtar sözcüğünü yazın.
- Bundan sonra bir nokta yazın.
- Burada seçebileceğiniz özelliklerin ve yöntemlerin bir listesine sahip olacaksınız.
- Bu listeden “Ekle”yi seçin veya yazın.
Sub vba_new_workbook() Workbooks.Add End Sub
Şablon kullanarak yeni bir çalışma kitabı ekleme
Dediğim gibi Workbooks.Add yöntemini kullanıyoruz. Bu yöntemle, bir dosyaya şablon olarak başvurmak için kullanabileceğiniz (isteğe bağlı) bir argüman vardır.
Workbook.Add Template (Optional)
Diyelim ki bir çalışma kitabınız var ve yeni çalışma kitabınızın onunla tamamen aynı olmasını istiyorsanız, buna şablon olarak başvurabilirsiniz.
Workbooks.Add Template:="C:UsersDellDesktopbook1.xlsx"
Yukarıdaki kodu çalıştırdığınızda masaüstünde kayıtlı olan “book1”in referansını alır. Model çalışma kitabı 6 çalışma sayfası içeriyor ve yeni çalışma kitabı da tam olarak aynı sayıda çalışma sayfası içeriyor.
Bunun dışında, yeni çalışma kitabında ne tür bir sayfanın olmasını istediğinize karar vermek için varsayılan bağımsız değişkenleri kullanabilirsiniz.
- xlWBATCchart : grafik sayfası
- xlWBATExcel4IntlMacroSheet: sürüm 4 makro sayfası
- xlWBATExcel4MacroSheet : makro sayfası (uluslararası) sürüm 4
- xlWBATWorksheet : elektronik tablo
Yeni bir Excel çalışma kitabı oluşturun ve kaydedin
Yeni bir çalışma kitabı oluşturduğunuzda Excel onu açar ancak Ekle yöntemiyle kaydetmez. Yani bunun için SaveAs yöntemini kullanmanız gerekiyor.
Sub vba_create_workbook() Workbooks.Add ActiveWorkbook.SaveAs "C:usersdelldesktopmyBook.xlsx" End Sub
- Öncelikle yeni bir çalışma kitabı oluşturmak için workbook.add dosyasını kullanın.
- Daha sonra etkin çalışma kitabına bakın ve Farklı Kaydet yöntemini kullanın.
- Farklı Kaydet yönteminde, çalışma kitabını dosya adıyla kaydetmek istediğiniz yolu kullanın.
- Sonunda kodu çalıştırın .