kaç adet panel kullanıldı (koşullu benzersiz ve benzerli)

[modoste]

Merhaba Sayın Hocalarım
ekli tablomda 24. satır ile 42. satır arasına duvar panellerini yerleştirdim.
sorum şu 1. sırada bulması gereken cevap (F2:F16 arasında koşullu benzersiz ile)
K4
C4
C4
D2 olamsı gerekiyor yani soldan 1. sırada4 adet panel konmuş üstüste bunu formülle bulamıyorum
altıgen şeklinde panellerin içinde mesela C4 leri neden altalta 2 defa P6 panelinde olduğu gibi 3 defa yazıyosun derseniz
projede böyle yazıyo o bakımdan verileri değişemiyorum.
çözüm nasıl olur

 

[ÖmerFaruk]

Formülle çözüm oldukça karmaşık olacağını düşünüyorum.
Verdiğiniz örnek dosya için aşağıdaki kodlar doğru sonucu üretiyor

Sub Karelaj()
For k = 6 To 18 Step 4
    say = 1
    For i = 24 To 41
    If Cells(i + 1, k).Borders(xlEdgeBottom).LineStyle = xlContinuous Then
        say = say + 1
        Cells(say, k) = Cells(i, k)
    End If
    Next
Next
End Sub

 

[modoste]

teşekkür ederim sayın ÖmerFaruk