Excel'de sütunlar virgülle ayrılmış bir listeye nasıl dönüştürülür?
Excel verileriyle çalışırken, dikey bir öğe listesini tek bir virgülle ayrılmış dizeye dönüştürmeniz sıkça gerekebilir. Veritabanı girişi hazırlıyor, rapor oluşturuyor ya da çalışma sayfanızı düzenliyorsanız, bunu gerçekleştirmenin birden fazla etkili yolu vardır. Aşağıda dört optimize edilmiş yöntemi inceleyeceğiz:
Formüllerle Sütunlar virgülle ayrılmış listeye dönüştürme
- Formül 1: TEXTJOIN işlevi (Excel 2019 ve sonraki sürümler, Office 365)
- Formül 2: CONCAT ve IF işlevleri (Tüm Excel sürümleri)
Kutools for Excel ile Sütunlar virgülle ayrılmış listeye dönüştürme
VBA koduyla Sütunlar virgülle ayrılmış listeye dönüştürme
Formüllerle Sütunlar virgülle ayrılmış listeye dönüştürme
Excel’de sütunu virgülle ayrılmış bir liste haline getiren doğrudan bir işlev olmasa da, Office 365/2019 ve sonraki sürümlerde TEXTJOIN işlevini veya tüm Excel sürümlerinde CONCAT ile IF işlevlerini birlikte kullanarak bunu kolayca gerçekleştirebilirsiniz.
Formül 1: TEXTJOIN işlevi (Excel 2019 ve sonraki sürümler, Office 365)
Excel’in en gelişmiş birleştirme işlevi olan TEXTJOIN, esnek ayırıcı seçeneği ve otomatik boş hücre yönetimi gibi çift işlevselliğiyle süreci kolaylaştırır; günümüz Excel kullanıcıları için en basit çözümü sunar.
1. Virgülle ayrılmış listeyi görüntülemek istediğiniz hücreyi seçin ve aşağıdaki formülü girin:
=TEXTJOIN(", ", TRUE, A2:A10)2. Virgülle ayrılmış değeri almak için Enter tuşuna basın.
- ", " ayırıcıdır (virgül ve ardından boşluk).
- TRUE, Excel'e boş hücreleri yoksaymasını söyler.
- A2:A10, sizin Kaynak aralığınız.
=TEXTJOIN(", ", TRUE, UNIQUE(A2:A10))- 🔹Basit uygulama: Tek bir işlev yeterlidir.
- 🔹 Esnek ayırıcı: Gerektiğinde “, ” (virgül ve boşluk) veya sadece “,” kullanabilirsiniz.
- 🔹Otomatik işlem: ignore_empty seçeneği TRUE olarak ayarlandığında boş hücreler atlanır.
- 🔸Excel 2019 veya sonraki sürümler / Office 365 gereklidir.
Formül 2: CONCAT ve IF işlevleri (Tüm Excel sürümleri)
TEXTJOIN öncesinde, bir listeyi bir araya getirmek ve ardından baştaki ayırıcıyı kaldırmak için CONCAT ile IF işlevini birleştirebilirdiniz.
1. Virgülle ayrılmış listenin görünmesini istediğiniz hücreyi seçin ve aşağıdaki formülü girin:
=CONCAT(IF(A2:A10<,>,"", A2:A10 &, ", ", ""))2. Sonucu almak için Ctrl + Shift + Enter tuşlarına birlikte basın.
- IF(A2:A100"", A2:A100 & "，", ""): A2:A100'deki her hücreyi denetler. Hücre boş değilse, değerini ve ardından bir virgül ekler; aksi takdirde boş bir dize döndürür.
- CONCAT(…): Bu dizideki tüm öğeleri tek bir sürekli dizeye birleştirir.
- 🔹Geniş uyumluluk: Daha yeni işlevlere bağlı kalmadan, dizi formüllerini destekleyen tüm Excel sürümlerinde sorunsuz çalışır.
- 🔹Boş hücreleri yoksayar: IF denetimi, boş hücreleri otomatik olarak atlar.
- 🔸Kullanımı zahmetli: Dizi formülü olarak girilmelidir; kullanıcıların Ctrl + Shift + Enter tuşlarına basması gerekir—bu adımı birçok yeni başlayan kullanıcı kaçırır.
- 🔸Düşük performans: On binlerce satırdan oluşan büyük veri kümeleriyle çalışırken hesaplama işlemleri önemli ölçüde yavaşlayabilir hatta program tamamen donabilir.
- 🔸Sabit sonuç: Son ayırıcıyı kaldırmak istiyorsanız, sondaki virgülü temizlemek için ekstra adımlar atmanız gerekir.
Kutools for Excel ile Sütunlar virgülle ayrılmış listeye dönüştürme
Kutools for Excel, güçlü bir Satırları/Sütunları/Hücreleri Birleştir ve Değerleri Koru aracı içerir; bu araç, tüm sütun içeriğini birkaç tıklamayla tek bir hücreye birleştirmenizi sağlar. Kaynak aralığını ve istediğiniz ayırıcıyı belirtin—virgül, noktalı virgül, boşluk ya da özel bir sembol olsun—anında birleştirilmiş, sınırlandırılmış bir liste oluşturun! Araç ayrıca boş hücreleri yoksayma ve orijinal biçimlendirmeyi koruma seçenekleriyle, dikey verileri düzgün, virgülle ayrılmış listelere hızlıca dönüştürmek için ideal bir çözümdür.
1. Virgülle ayrılmış listeye dönüştürmek istediğiniz sütunları seçin ve Kutools > Birleştir ve Ayır > Satırları/Sütunları/Hücreleri Birleştir ve Değerleri Koru seçeneğine tıklayın.
Açılan Sütunları Birleştir veya Satırlariletişim kutusunda şunları yapmanız gerekir:
- (1) Seçilen aralığı aşağıdaki şekilde birleştirmek için "Bir hücrede birleştir" seçeneğini işaretleyin.
- (2) Ayırıcı bölümünde "Diğer ayırıcı" seçeneğini işaretleyin ve virgül (",") girin.
- (3.) Orijinal hücre verilerini nasıl işleyeceğinizi seçin: içeriklerini koruyabilir ya da orijinal hücrelerden içeriği silebilirsiniz.
- (4.) "Birleştirilmiş değerleri şuraya yerleştir" bölümünde **Diğer Hücre** seçeneğini seçin ve sonucun çıktısını almak üzere bir hücreye tıklayın.
- (5.) Son olarak, Tamam düğmesine tıklayın.
Sonuç, belirttiğiniz hedef hücreye yerleştirilir.
- 🔹Son derece kullanıcı dostu.
- 🔹Formül veya kod gerekmez.
- 🔹Geniş aralıkları sorunsuz şekilde işler.
- 🔹Satırları, sütunları veya aralıkları istediğiniz ayırıcıyla birleştirin, biçimlendirmeyi koruyun ve çıktının nereye yerleştirileceğini seçin.
- 🔸Yükleme gerektirir.
VBA koduyla Sütunlar virgülle ayrılmış listeye dönüştürme
Alternatif olarak, görevi otomatikleştirmeyi tercih ediyorsanız veya daha büyük ve dinamik olarak değişen aralıkları işlemek gerekiyorsa, belirttiğiniz sütundaki her hücreyi tarayıp boş olmayan değerleri virgülle (veya seçtiğiniz başka bir ayırıcıyla) birleştiren, sonunda oluşan fazladan ayırıcıyı temizleyen ve elde edilen tamamen birleştirilmiş, virgülle ayrılmış dizeyi hedef bir hücreye yerleştiren bir VBA makrosu yazabilirsiniz.
1. Microsoft Visual Basic for Applications penceresini açmak için klavyede Alt ve F11 tuşlarını birlikte basın.
2. Ekle > Modül’e tıklayın ve VBA kodunu modüle kopyalayın.
VBA: Sütunlar virgülle ayrılmış listeye dönüştürme
Sub ChangeRange()
' Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range, OutRng As Range
Dim outStr As String
Dim xTitleId As String
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Select source range:", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Output to (single cell):", xTitleId, Type:=8)
outStr = ""
For Each rng In InputRng
If Len(Trim(rng.Value)) > 0 Then
If outStr = "" Then
outStr = rng.Value
Else
outStr = outStr & ", " & rng.Value
End If
End If
Next rng
OutRng.Value = outStr
End Sub
3. Çalıştır düğmesine tıklayın veya VBA'yı çalıştırmak için F5 tuşuna basın. Ekranda bir iletişim kutusu görüntülenir ve dönüştürmek istediğiniz sütunları seçebilirsiniz. Ekran görüntüsüne bakın:
4. Tamam'a tıklayın; ardından sonucun yerleştirileceği hücreyi seçmeniz için yeni bir iletişim kutusu açılacak. Ekran görüntüsüne bakın:
5. Tamam'a tıklayın; böylece Sütunlar içindeki tüm değerler, bir hücrede virgülle ayrılmış bir listeye dönüştürülmüş olur.
Sonuç:
- Basitlik ve performans için Excel 2019/365’te TEXTJOIN işlevini kullanın.
- Uyumluluk açısından, CONCAT ve IF işlevlerinin dizi yöntemi tüm sürümlerde sorunsuz çalışır.
- Formüller olmadan tek seferlik görevler için Kutools, tıkla ve sürükle özelliğine sahip pratik bir çözüm sunar.
- VBA makrosu, otomasyon veya karmaşık kurallar için en esnek seçenektir.
Excel sürümünüzle, görevin sıklığıyla ve eklentilere ya da VBA’ya olan aşinalık düzeyinizle uyumlu yöntemi seçin. Bu optimize edilmiş tekniklerle donanımlı olduğunuzda, herhangi bir sütunu düzgün, virgülle ayrılmış bir listeye dönüştürmek çocuk oyuncağı olur! Excel hakkında daha fazla ipucu ve püf noktası keşfetmeye ilgi duyuyorsanız,web sitemizde Excel'i ustalıkla kullanmanıza yardımcı olacak binlerce öğretici bulunmaktadır.
İlgili Makaleler:
- Excel'de ay adını sayıya dönüştürme
- Askeri saati standart saate dönüştürme
- Excel'de bir hücreyi birden çok hücreye/satıra dönüştürme
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar