Bu öğretici, VBA kullanarak yeni bir çalışma kitabı oluşturmanın farklı yöntemlerini gösterecektir.
Yeni Çalışma Kitabı Oluştur
Yeni bir çalışma kitabı oluşturmak için basitçe kullanın Çalışma kitapları.Ekle:
1 | Çalışma kitapları.Ekle |
Yeni eklenen Çalışma Kitabı artık AktifÇalışma Kitabı.
Bu kodu kullanarak bunu görebilirsiniz:
123456 | Alt AddWB()Çalışma kitapları.EkleMsgBox ActiveWorkbook.NameAlt Bitiş |
Yeni Çalışma Kitabı Oluştur ve Nesneye Ata
Yeni Çalışma Kitabına başvurmak için ActiveWorkbook nesnesini kullanabilirsiniz. Bunu kullanarak, yeni Çalışma Kitabını bir Nesne Değişkenine atayabilirsiniz:
1234 | Çalışma Kitabı olarak wb'yi karartÇalışma kitapları.Eklewb = ActiveWorkbook'u ayarla |
Ancak, Çalışma Kitabı oluşturulduğunda Çalışma Kitabını hemen bir değişkene atamak daha iyi/kolaydır:
123 | Çalışma Kitabı Olarak Dim wbwb = Çalışma Kitaplarını ayarla.Add |
Artık yeni Çalışma Kitabına değişken adıyla başvurabilirsiniz.
1 | MsgBox wb.Adı |
Yeni Çalışma Kitabı Oluştur ve Kaydet
Ayrıca yeni bir Çalışma Kitabı oluşturabilir ve hemen kaydedebilirsiniz:
1 | Workbooks.Add.SaveAs Dosya Adı:="NewWB" |
Bu, Çalışma Kitabını varsayılan klasörünüze (ör. Belgelerim) bir .xlsx dosyası olarak kaydeder. Bunun yerine, Çalışma Kitaplarını kaydetme kılavuzumuzla SaveAs'ı özelleştirebilirsiniz.
Artık Çalışma Kitabına adıyla başvurabilirsiniz:
1 | Workbooks("NewWB.xlsx").Activate |
Bu kod “NewWB.xlsx”i Etkinleştirecektir.
Yeni Çalışma Kitabı Oluştur ve Sayfa Ekle
Bir Çalışma Kitabı oluşturduktan sonra düzenleyebilirsiniz. Yeni Çalışma Kitabına iki sayfa eklemek için yalnızca bir örnek (ActiveWorkbook olduğu varsayılarak):
1 | ActiveWorkbook.Worksheets.Add Sayısı:=2 |