VBA Dosya Oluşturma

101 Okunma VBA

VBA'da bir dosya oluşturmak için aşağıdaki kod kullanılabilir.. 

Sub Dosya_Olustur()
  DosyaYolu = "C:\deneme.txt"
  Set dosya = Fso.CreateTextFile(DosyaYolu, True)
  dosya.WriteLine ("Merhaba Dünya!")
  dosya.Close
End Sub

Bu kod, bir FSO (File System Object) nesnesi oluşturur ve onu kullanarak bir dosya oluşturur. Dosya yolu "C:\deneme.txt" olarak belirlenir ve "Merhaba Dünya!" satırını içerecek şekilde yazılır. Sonra dosya kapatılır.

VBA

İlginizi Çekebilir

VBA Bir Sayının 5'in Katı Olup Olmadığını Gösteren Örnek

VBA Tüm Kolonları Auto Fit Yapmak

VBA Üç Kenarı Verilen Bir Üçgenin Alanını Bulma

VBA Dosyanın Uzantısını Bulma

VBA 1'den N'e Kadar Olan Sayıların Toplamını Bulma Örneği