Yeni Excel Dosyası Oluşturmak

Workbooks.Add

Elinizdeki verileri ayırıp yeni bir dosyaya aktarmak istediğinizde öncelikle sanal bir boş Excel dosyası açtırmalısınız.

VBA Kodu:

Sub YeniDosyaAc()
    Workbooks.Add
    Range("A1").Value = "Yeni Dosyaya Merhaba"
End Sub

Ne Göreceksiniz? Ekranda "Kitap1" adında yepyeni, bağımsız bir Excel penceresi açılacak ve A1 hücresine metin yazılacaktır.