Excel'deki hücre aralığını csv dosyasına nasıl aktarılır?

Excel'de, Tümünü Kaydet işlevini kullanarak tüm çalışma sayfasını csv dosyası olarak kaydedebiliriz, ancak bir çalışma sayfasından bir hücre aralığını csv dosyasına aktarmayı denediniz mi? Bu makalede, Excel'de bu sorunu çözmek için yöntemleri öğreneceksiniz.

VBA kodu ile Excel'deki hücre aralığını csv dosyasına aktarma

Kutools for Excel ile Excel'deki hücre aralığını csv dosyasına aktarma

VBA kodu ile Excel'deki hücre aralığını csv dosyasına aktarma

Burada, Excel'den csv dosyasına bir hücre aralığı aktarmak için bir VBA kodum var, lütfen şu adımları izleyin:

1. ALT + F11 tuşlarını basılı tutun ve Microsoft Visual Basic for Applications penceresi açılacaktır.

2. Ekle Insert > Module'e tıklayın ve aşağıdaki kodu Module Penceresine yapıştırın.

VBA kodu: Bir hücre aralığındaki içerikleri csv dosyasına aktarma

Sub ExportRangetoFile()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim xFile As Variant
Dim xFileString As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.Copy
Application.ActiveSheet.Cells.Clear
WorkRng.Copy Application.ActiveSheet.Range("A1")
Set xFile = CreateObject("Scripting.FileSystemObject")
xFileString = Application.GetSaveAsFilename("", filefilter:="Comma Separated Text (*.CSV), *.CSV")
Application.ActiveWorkbook.SaveAs Filename:=xFileString, FileFormat:=xlCSV, CreateBackup:=False
End Sub

3. Ardından bu kodu çalıştırmak için F5 tuşuna basın ve aktarmak istediğiniz hücre aralığını seçmenizi hatırlatan bir uyarı kutusu açılacaktır.

4. Tamam butonuna tıklayın, yeni csv dosyasını kaydetmek için bir dizin belirtin ve Dosya adı metin kutusunda csv dosyası için bir isim verin, ekran görüntüsüne bakınız:

5. Kaydet butonuna tıklayın ve seçilen aralık csv dosyası olarak kaydedilecektir, belirttiğiniz klasöre giderek görüntüleyebilirsiniz.

Kutools for Excel ile Excel'deki hücre aralığını csv dosyasına aktarma

Eğer VBA koduyla ilgilenmiyorsanız, burada size kolay bir araç tanıtacağım – Kutools for Excel, Aralığı Dışa Aktar özelliğiyle bu işi hızlıca çözebilirsiniz.

Kutools for Excel'i yükledikten sonra, lütfen şu adımları izleyin:

1. Csv dosyasına aktarmak istediğiniz veri aralığını seçin.

2. Ardından Kutools Plus > İçe Aktar & Dışa Aktar > Aralığı Dışa Aktar'a tıklayın, ekran görüntüsüne bakınız:

3. Aralığı Dışa Aktar penceresinde, Dosya Türü seçeneğinden CSV (Virgülle Ayrılmış) seçin ve ardından yeni csv dosyasını kaydetmek için Kaydetme yolunu belirtin, ekran görüntüsüne bakınız:

4. Tamam butonuna tıklayın, bu yeni csv dosyası için bir isim belirtmenizi hatırlatan bir uyarı kutusu açılacak, ardından Kutuyu Kapatmak için Tamam'a tıklayın ve seçilen veriler hemen bir CSV dosyası olarak aktarılacaktır.

Notlar:

Gerçek değeri kaydet: Nihai dosyada gerçek değerleri gösterecektir.

Ekranda görünen değerleri kaydet: Nihai dosyada bilgisayar ekranında okuduğunuz gibi aynı değerleri gösterecektir.

Dışa aktardıktan sonra dosyayı aç: Bu seçeneği işaretlerseniz, aralığı dışa aktardıktan sonra nihai dosyayı otomatik olarak açacaktır.

Kutools for Excel'i şimdi indirin ve ücretsiz deneyin!