Aynı Katagoriyi Biraraya toplama

[ormann]

İyi günler ekteki örnek dosyada d3:d25 hücreleri arasında 8 adet (a,b,c,d,e,f,g,h) isminde katagori var.Benim yapmak istediğim bu katogorilerden her hangi birini seçtiğim zaman örneğin:A katagorisini seçtiğim zaman bu katagoriyi I15:I22 hücreleri arasında boş olan (en üstten başlayarak ) hücreye yazması.Örnek dosyadaki gibi.
Not:aynı katagoriden birden fazla varsa yine I15:I22 hücresine tek yazacak.

 

[Emir Hüseyin Çoban]

. . .

Sorunuzu okuyorum, ancak anlayamıyorum.
Sorunuzu biraz daha açınız. Hatta adım adım örnek dosyanızda gösterebilirsiniz.

. . .

 

[Merhum İdris SERDAR]

İyi günler ekteki örnek dosyada d3:d25 hücreleri arasında 8 adet (a,b,c,d,e,f,g,h) isminde katagori var.Benim yapmak istediğim bu katogorilerden her hangi birini seçtiğim zaman örneğin:A katagorisini seçtiğim zaman bu katagoriyi I15:I22 hücreleri arasında boş olan (en üstten başlayarak ) hücreye yazması.Örnek dosyadaki gibi.
Not:aynı katagoriden birden fazla varsa yine I15:I22 hücresine tek yazacak.

.

Buradaki örneği inceleyiniz.

http://www.excel.web.tr/f122/tekrarsyz-liste-t86901.html

.

 

[ormann]

.

Buradaki örneği inceleyiniz.

http://www.excel.web.tr/f122/tekrarsyz-liste-t86901.html

.

Sayın Yurttaş hocam yapmış olduğunuz örnek tam istediğim şekilde.Yalnız örneğin "b" sütününda veri olmayan yerlerdeki #YOK hatasını nasıl giderebiliriz ?

 

[Merhum İdris SERDAR]

Sayın Yurttaş hocam yapmış olduğunuz örnek tam istediğim şekilde.Yalnız örneğin "b" sütününda veri olmayan yerlerdeki #YOK hatasını nasıl giderebiliriz ?

.

Excel sürümünüz ne?

2003, 2007 - 2010 hangisi?

Ona göre yanıt vereyim.

Onun için profilinizde Excel versiyonu / sürümü istenir.

.

 

[ormann]

2003 sürümünü kullanıyorum

 

[Merhum İdris SERDAR]

2003 sürümünü kullanıyorum

.

=EĞER(EHATALIYSA(Formülünüz);"";Formülünüz)

.

 

[ormann]

=İNDİS(Liste;KAÇINCI(0;EĞERSAY($B$1:B1;Liste);0))

Hocam bu formüle nasıl ilave edeceğiz.

 

[Merhum İdris SERDAR]

.

Dosyanız ekte.

.

 

[ormann]

Sayın Yurttaş hocam ellerinize sağlık.Örneği kendi dosyama uyguluyorum.Fakat bir türlü olmuyor.acaba bir yerlerde gizli formül mü var diye kontrol ediyorum.Bulamıyorum.Size zahmet olacak ama ekteki dosya da C7:C25 hücre aralığındaki verinin tekrarını C32:C36 hücre aralığına uygulayabilirmisiniz?

 

[Emir Hüseyin Çoban]

. . .

Kodlar ile alternatif.

Sub Kod()
For a = 3 To [D65536].End(3).Row
If WorksheetFunction.CountIf(Range("D3:D" & a), Cells(a, "D")) = 1 Then
c = c + 1
Cells(c + 14, "I") = Cells(a, "D")
End If
Next
End Sub

Tıkla ~ Mükerrer Kayıt Makrosu 2 Nolu Mesaj

. . .

.
Excel sürümünüz ne?
2003, 2007 - 2010 hangisi?
Ona göre yanıt vereyim.
Onun için profilinizde Excel versiyonu / sürümü istenir.
.

Tıkla ~ Profil Bilgilerinizde Excel Versiyon Ve Dili Güncelleme

. . .

 

[Merhum İdris SERDAR]

Sayın Yurttaş hocam ellerinize sağlık.Örneği kendi dosyama uyguluyorum.Fakat bir türlü olmuyor.acaba bir yerlerde gizli formül mü var diye kontrol ediyorum.Bulamıyorum.Size zahmet olacak ama ekteki dosya da C7:C25 hücre aralığındaki verinin tekrarını C32:C36 hücre aralığına uygulayabilirmisiniz?

.

Dosyanız ekte.

.

 

[ormann]

Sayın Yurttaş ve Sayın Hüseyin bey çok çok teşekkür ederim.