alt alta tekrarlı verileri tablo yapma

[insaatforumu]

Merhaba,
Elimde

Ad
Soyadı
İli
Ad
Soyadı
İli
.
.

şeklinde tekrarlayan bir liste var bunu aşağıdaki şekilde nasıl toparlarım.

Ad Soyadı İli
Ad Soyadı İli
. . .

 

[sakman26]

selam,
istenilen bu mudur bilemiyorum , ama ,
eki inceleyiniz...
kolay gelsin...

 

[Murat OSMA]

Makro ile çözüm isterseniz, şu kodları kullanabilirsiniz;

Sub Altalta_Yaz()
    Dim Rky As Integer, i As Integer
    i = 2
    Application.ScreenUpdating = False
    For Rky = 2 To Range("B65536").End(3).Row Step 3
        Cells(i, "K") = Cells(Rky, 2)
        Cells(i, "L") = Cells(Rky + 1, 2)
        Cells(i, "M") = Cells(Rky + 2, 2)
        i = i + 1
    Next Rky
    Application.ScreenUpdating = True
    i = Empty: Rky = Empty
End Sub