Tekrar Eden Verileri Farklı Sütunda Yazma isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
[*]Microsoft Excel Objects yazısının solundaki + simgesini tıklayın ve BuÇalışmaKitabı kısmına çift tıklayın.
Faydalanılması temennisiyle
[*]Microsoft Excel Objects yazısının solundaki + simgesini tıklayın ve BuÇalışmaKitabı kısmına çift tıklayın.
Hazır Kod
VBA:
Sub Listele()
Dim Hucre As Range
For Each Hucre In Range("A1:A20")
If WorksheetFunction.CountIf(Range("A1:A20"), Hucre) > 1 Then
Hucre.Offset(0, 1) = Hucre
End If
Next
End SubAçıklama
Eğer A sütununda tekrar eden verileriniz varsa, üstteki kodu çalıştırarak hangileri tekrar etmişse onları yan sütuna yazdırabilirsiniz.Faydalanılması temennisiyle
