AccessTr.neT

Tam Versiyon: Hücre Birleştirme Hk
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Ekli dosyamda il ilçe mahalle listesi bulunmakta benim istediğim

B,C,D sütunlarındaki aynı isimli hücreleri birleştirmesi

Örnek: A1:A150 arası "Adana" yazılı. A1:A150 arasını birleştirip tek hücrede "Adana" yazmasını makro ile nasıl sağlarım.
Teşekkürler
Merhaba;
aşağıdaki kodu denermisiniz.
Kod:
Sub Birlestir()
    Dim i As Integer
    Dim d As String
    For i = 2 To [C65536].End(3).Row
        If Len(d) = 0 Then
            d = Cells(i, "C")
        Else
            d = d & ";" & Cells(i, "C")
        End If
    Next i
    [D1] = d
End Sub
[/vb]
Lütfen konu ile geri dönüş yaparsanız seviniriz.
Teşekkürler...