Vba'da dizeleri birleştirme (örneklerle)


VBA’da dizeleri birleştirmek için aşağıdaki yöntemleri kullanabilirsiniz:

Yöntem 1: İki dizeyi birleştirme

 SubConcatStrings ()
    Range(" C2 ") = Range(" A2 ") & Range(" B2 ")
End Sub

Bu örnek, A2 ve B2 hücrelerindeki dizeleri birleştirecek ve sonucu C2 hücresinde görüntüleyecektir.

Yöntem 2: İki dizeyi sınırlayıcıyla birleştirme

 SubConcatStrings ()
    Range(" C2 ") = Range(" A2 ") & " " & Range(" B2 ")
End Sub

Bu örnek, A2 ve B2 hücrelerindeki dizeleri dizeler arasında bir boşluk bırakarak birleştirecek ve sonucu C2 hücresinde görüntüleyecektir.

Yöntem 3: İki sütunu sınırlayıcıyla birleştirme

 SubConcatStrings ()
    Dim i As Integer

    For i = 2 To 6
      Cells(i, 3).Value = Cells(i, 1) & " _ " & Cells(i, 2)
    Next i
End Sub

Bu örnek, A2:A6 ve B2:B6 aralığındaki dizeleri dizelerin arasında bir alt çizgiyle birleştirecek ve sonuçları C2:C6 hücrelerinde görüntüleyecektir.

Aşağıdaki örnekler bu yöntemlerin her birinin pratikte nasıl kullanılacağını göstermektedir.

Örnek 1: İki dizeyi birleştirme

İki dizeyi birleştirmek için aşağıdaki makroyu oluşturabiliriz:

 SubConcatStrings ()
    Range(" C2 ") = Range(" A2 ") & Range(" B2 ")
End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

A2 ve B2 hücrelerindeki dizelerin C2 hücresinde birleştirildiğini unutmayın.

Örnek 2: İki dizeyi sınırlayıcıyla birleştirme

İki dizeyi sınırlayıcı olarak bir boşlukla birleştirmek için aşağıdaki makroyu oluşturabiliriz:

 SubConcatStrings ()
    Range(" C2 ") = Range(" A2 ") & " " & Range(" B2 ")
End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

A2 ve B2 hücrelerindeki dizelerin aralarında boşluk olacak şekilde birleştirildiğini ve sonucun C2 hücresinde görüntülendiğini unutmayın.

Örnek 3: İki sütunu sınırlayıcıyla birleştirme

Dizeleri sınırlayıcı olarak alt çizgiyle iki sütunda birleştirmek için aşağıdaki makroyu oluşturabiliriz:

 SubConcatStrings ()
    Dim i As Integer

    For i = 2 To 6
      Cells(i, 3).Value = Cells(i, 1) & " _ " & Cells(i, 2)
    Next i
End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

A2:A6 ve B2:B6 aralığındaki dizelerin aralarında bir alt çizgi ile birleştirildiğini ve sonuçların C2:C6 aralığında görüntülendiğini unutmayın.

Ek kaynaklar

Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:

VBA: Bir dizedeki karakterlerin oluşumlarını sayma
VBA: bir dizenin başka bir dize içerip içermediği nasıl kontrol edilir
VBA: Belirli bir metin içeren hücreler nasıl sayılır?

Yorum ekle

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir