Excel dosyalarını (XLS) virgüllerle ayrılmış değerler (CSV) dosyalarına dönüştürmek, veri paylaşımı ve taşınabilirlik açısından oldukça önemlidir. Bu işlem, özellikle büyük veri setleriyle çalışırken manuel olarak yapılması zor olabilir. Neyse ki, Excel’de makro kullanarak bu dönüşümü otomatikleştirmek mümkündür. İşte adım adım nasıl yapılacağı:
1. Makro Nedir?
Makro, Excel’de tekrarlayan görevleri otomatikleştirmek için kullanılan küçük programlardır. VBA (Visual Basic for Applications) dili ile yazılırlar ve kullanıcıların zaman kazanmasını sağlarlar.
2. Makro Oluşturma Adımları
Adım 1: Excel Dosyasını Açın
İlk olarak, dönüştürmek istediğiniz XLS dosyasını Excel’de açın.
Adım 2: Geliştirici Sekmesini Etkinleştirin
Eğer Geliştirici sekmesi etkin değilse, bunu etkinleştirmeniz gerekecek:
- Dosya > Seçenekler > Şeridi Özelleştir yolunu izleyin.
- Sağ taraftaki ana sekmelerden “Geliştirici” kutusunu işaretleyin ve Tamam’a tıklayın.
Adım 3: Makro Kaydedin
- Geliştirici sekmesine gidin ve “Makro Kaydet” butonuna tıklayın.
- Makronuza bir isim verin ve “Tamam” butonuna tıklayın.
Adım 4: Makro Kodunu Yazın
Makro kaydedici açıkken, aşağıdaki adımları izleyin:
- Dosya > Farklı Kaydet yolunu izleyin.
- Dosya türü olarak “CSV (Virgülle Ayrılmış)” seçeneğini seçin.
- Dosyanızı kaydedin ve makro kaydediciyi durdurun.
Adım 5: VBA Kodunu Düzenleyin
Geliştirici sekmesinde “Visual Basic” butonuna tıklayın ve kaydettiğiniz makroyu bulun. Aşağıdaki kodu makronuza ekleyin:
Sub XLS_to_CSV()
Dim ws As Worksheet
Dim csvFile As String
csvFile = Application.GetSaveAsFilename(FileFilter:="CSV Dosyaları (*.csv), *.csv")
If csvFile <> "False" Then
For Each ws In ThisWorkbook.Worksheets
ws.Copy
ActiveWorkbook.SaveAs Filename:=csvFile, FileFormat:=xlCSV, CreateBackup:=False
ActiveWorkbook.Close False
Next ws
End If
End Sub
3. Makroyu Çalıştırma
Makroyu çalıştırmak için:
- Geliştirici sekmesinde “Makrolar” butonuna tıklayın.
- Oluşturduğunuz makroyu seçin ve “Çalıştır” butonuna tıklayın.