Soru birden fazla şarta bağlı olarak sütun üzerindeki verileri tek hücrede yazmak

[euphrates55]

birden fazla şarta bağlı olarak aynı veya farklı çalışma sayfasından alınacak sütun üzerindeki verileri tek hücrede, aralarında birer boşluk bırakarak yazmak için bir modül bir kod bir formül var mıdır.? forumda arama yaparak bir çoğunu dolaştım ama hep gönderilen tablolara özel çözümler olmuş. bu konu da yapılacak bir açıklama sanırım şu anda en çok benim işime daha sonraları için ise herkese faydalı olacağı kanısındayım. şimdiden teşekkürler...

 

[u.L.a.s]

Merhaba

Örneğin bir sheette A sütununa alt alta topladığınız verileri B sütununda B1 hücresi içerisine aralarında boşluk bırakarak yazacak makro kod aşağıdadır.. İlgili sheetin vba kod editör kısmına bu kodları yapıştırın gerekirse sheet üstünde bir buton yaratıp bu butona bu makroyu atayın

Sub HucreDegerBirlestir()
    Dim xRng As Range, cll As Range
    Dim xStr As String
    Set xRng = Range("A:A").SpecialCells(xlCellTypeConstants, 23)
    If xRng.Count = 0 Then
        MsgBox "Dolu Hücre yok"
    End If
    For Each cll In xRng
        xStr = xStr & IIf(Len(xStr) = 0, "", " ") & cll.Value
        Next
    Range("B1").Value = xStr
    
End Sub

 

[euphrates55]

teşekkürler ama tabi bu soruma cevap niteliğinde değil gibi. belli şartları da içerisine alacak şekilde yapılması işimi ancak görebilecektir.

 

[u.L.a.s]

o şartlar için örnek dosya koymanız gerekecek.

 

[euphrates55]

o şartlar için örnek dosya koymanız gerekecek.

https://ps.kgm.gov.tr/pg/shareView/7167243d-e3ed-4d1d-a777-f2c0f747fd20 şifre = 0