karşılastırma

[M3004]

iki ayrı sutundaki değerleri karşılaştırmak istiyorum. aynı değerler varsa sadece birini yazacak. işin içinden çıkamadım tşk.

 

[HIDROKINON]

=eğer(a1=b1;a1;"")

 

[M3004]

bu formül ihtiyacıma cevap vermiyor. denemiştim

 

[muygun]

bir sütunda en az 1 kez geçenleri alma

Slm.lar
Size bir formül değil formüller manzumesi lazım.
Yada makro...
Ã?rneğinizin 2.sayfasını inceleyin.
iyi çalışmalar.

 

[zafer]

Merhaba

Makro ile isterseniz.

e sütununa ayıklayıp yapıştırır


Sub listele1()
x = WorksheetFunction.CountA(Range("A:a")) + 1
For Each hucre In Range("A1:b" & x)
If WorksheetFunction.CountIf(Range("A1:b" & x), hucre) >= 1 Then
If WorksheetFunction.CountIf(Range("e1:e" & x), hucre) = 0 Then
C = C + 1

Cells(C + 1, 5) = hucre
End If
End If
Next

End Sub

saygılarımla

 

[M3004]

ÇOK TEÞEKKÜR EDERİM ARKADAÞLAR . SORUNUMU ÇÃ?ZDÜ.