Excel’de iki sütunu, sırayla gelen değerlerle tek bir sütunda nasıl birleştirirsiniz?
Bir çalışma sayfasında iki sütun bulunuyor. Görev, aşağıdaki ekran görüntüsünde gösterildiği gibi bu iki sütunu sırayla gelen değerlerle tek bir sütunda birleştirmek. Bu görevi tek tek yeniden sıralamadan hızlıca nasıl halledebilirsiniz?
İki sütunu sırayla gelen değerlerle VBA koduyla tek bir sütunda birleştirme
İki sütunu sırayla gelen değerlerle Kutools for Excel kullanarak tek bir sütunda birleştirme 
İki sütunu sırayla gelen değerlerle VBA koduyla tek bir sütunda birleştirme
Excel'de iki sütunu sırayla gelen değerlerle tek bir sütunda birleştirmek için yerleşik bir işlev bulunmamaktadır; bunun için yalnızca VBA kodundan yararlanılabilir.
1. Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın. Yeni bir boş modül oluşturmak için Ekle > Modül seçeneğine tıklayın.
2. Aşağıdaki kodu modüle kopyalayıp yapıştırın.
VBA: İki sütunu sırayla gelen değerlerle tek bir sütunda birleştirme
Sub MergeColumns()
'UpdatebyExtendoffice20180815
Dim xSRg, xDRg As Range
Dim xDWS As Worksheet
Dim xIntDR, xIntDC, xI As Long
Dim xFNum As Long
On Error GoTo Err1
Set xSRg = Application.InputBox("Select two columns:", "Kutools for Excel", xTxt, , , , , 8)
If xSRg Is Nothing Then
Err1:
Application.ScreenUpdating = True
Exit Sub
End If
Set xDRg = Application.InputBox("Select a cell to place result:", "Kutools for Excel", xTxt, , , , , 8)
If xDRg Is Nothing Then
Exit Sub
End If
Application.ScreenUpdating = False
Set xDWS = xDRg.Worksheet
xIntDR = xDRg.Row
xIntDC = xDRg.Column
xI = 0
For xFNum = 1 To xSRg.Count
Set xDRg = xDWS.Cells(xIntDR + xI, xIntDC)
xDRg.Value = xSRg.Item(xFNum).Value
xI = xI + 1
Next xFNum
Application.ScreenUpdating = True
End Sub3. F5 tuşuna basın ve birleştirmek istediğiniz iki sütunu açılan iletişim kutusundan seçin.
4. Tamam düğmesine tıklayın; ikinci iletişim kutusunda sonucun yerleştirileceği hücreyi seçin.
5. Tamam düğmesine tıklayın. Artık seçilen iki sütun, sırayla gelen değerlerle tek bir sütunda birleştirildi.
İki sütunu sırayla gelen değerlerle Kutools for Excel kullanarak tek bir sütunda birleştirme
Excel'e Kutools for Excel eklentisi yüklenmişse, Transform Range aracı bu görevi yalnızca üç kolay adımda tamamlayabilir.
1. Birleştirmek istediğiniz iki veya daha fazla sütunu seçin, ardından Kutools > Transform Range seçeneğine tıklayın.
2. Transform Range iletişim kutusunda Range to single column seçeneğini işaretleyin ve Tamam düğmesine tıklayın.
3. Sonucun yerleştirileceği hücreyi, açılan iletişim kutusundan seçin.Tamamdüğmesine tıklayın.
Artık sütunlar tek bir sütunda birleştirildi ve değerler iki sütun arasında sırayla yer alıyor.
Kutools for Excel– Excel'i, işinizi daha hızlı ve kolay hale getiren 300 temel araçla güçlendirin ve daha akıllı veri işleme ile üretkenlik için yapay zekâ özelliklerinden yararlanın.Hemen Edinin
Demo: Kutools for Excel kullanarak Aralık Transpozisyonu
En İyi Office Verimlilik Araçları
Excel becerilerinizi Kutools for Excel ile güçlendirin ve hiç yaşanmamış bir verimlilik deneyimi yaşayın.Kutools for Excel, verimliliğ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’e sekmeli arayüz getirir ve 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.
- Birden fazla belgeyi yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açın ve oluşturun.
- Günlük verimliliğ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 yükleyiciyle!
Kutools for Office paketi; Excel, Word, Outlook ve PowerPoint için eklentilerin yanı sıra Office Tab Pro’yu da içerir ve Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek yükleyici, tek lisans— birkaç dakikada kurulum (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı verimlilik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— tek tek eklenti satın almaya göre tasarruf edin