Excel'de Alt Alta Satırları Yan Yana Virgülle Ayırma

Excelde alt atla satırları tek hücrede virgülle ayrılmış olarak kolayca düzenleyebilirsiniz.

Nasıl Yapılır?

1- Aşağıdaki kodu , ilgili sekmenin üzerinde sağ tuş yaparak ekleyebilirsiniz.

2- Daha sonrasında açılan pencereye kodu ekleyip Run tıklatmanız gerekiyor.

3- Sonuç aşağıdaki gibi görüntülenmesi gerekiyor.

Kod

Sub birleştir()

son = Cells(65536, 1).End(xlUp).Row

For i = 1 To son

ad = Cells(i, 1)

[b1] = [b1] + ad & ","

Next

End Sub