[]
aşağıda tabloda belirtiğim gibi bir liste var ben farklı bir sayfaya j sutunun da ''0 '' olanların isim ve numaraları ile almak istiyorum nasıl yapabilirim
excel sorusu
aşağıda tabloda belirtiğim gibi bir liste var ben farklı bir sayfaya j sutunun da ''0 '' olanların isim ve numaraları ile almak istiyorum nasıl yapabilirim
filtreyi actiktan sonra j'ye gore filtreleyip kalan satirlari kopyalayarak yapabilirsin
- fakyoras
(08.08.20 09:46:41)
liste değişkenlik göstermekte dediğiniz maalesef işimi görmez
- revi
(08.08.20 09:50:03)
Numara için (A2 HÜCRESİNDE FORMÜL)
=İNDİS(Sheet1!B:J;KAÇINCI(0;Sheet1!J:J;0);3)
İsim için (A1 HÜCRESİNDE FORMÜL)
=İNDİS(Sheet1!B:J;KAÇINCI(A2;Sheet1!J:J;0);2)
Hata olabilir ama mantık bu.
Ek : Numara benzersiz olacağı için isim çekerken numara referans alınmalı.
=İNDİS(Sheet1!B:J;KAÇINCI(0;Sheet1!J:J;0);3)
İsim için (A1 HÜCRESİNDE FORMÜL)
=İNDİS(Sheet1!B:J;KAÇINCI(A2;Sheet1!J:J;0);2)
Hata olabilir ama mantık bu.
Ek : Numara benzersiz olacağı için isim çekerken numara referans alınmalı.
- IncredibleMau (08.08.20 09:54:18 ~ 09:55:43)
Maalesef olmadı yada yapamadım
- revi (08.08.20 18:36:32)
Sayfa2 isminde diğer sekmeyi oluşturun. A1 hücresine isim, B1 hücresine numara yazın. Listenin başlık isimleri olacak bunlar.
Geliştirici/kod görüntüleden makroya geçin (alt + f11)
Sub listeyap
Sonsatir = cells(rows.count, "b").end(xlup).row
For i = 1 to Sonsatir
Sonsatir2 = sheets("Sayfa2").cells(rows.count, "a").end(xlup).row
If cells(i,10).value = 0 then
Sheets("sayfa2").cells(sonsatir2+1,1).value = sheets("Sayfa1").cells(i,3).value
Sheets("sayfa2").cells(sonsatir2+1,2).value = sheets("Sayfa1").cells(i,4).value
End if
Next i
End sub
Yukarıdaki play işaretine basarsanız işlem tamamlanır. Telefondan yazıyorum olmazsa yazın bilgisayardan bakayım.
Geliştirici/kod görüntüleden makroya geçin (alt + f11)
Sub listeyap
Sonsatir = cells(rows.count, "b").end(xlup).row
For i = 1 to Sonsatir
Sonsatir2 = sheets("Sayfa2").cells(rows.count, "a").end(xlup).row
If cells(i,10).value = 0 then
Sheets("sayfa2").cells(sonsatir2+1,1).value = sheets("Sayfa1").cells(i,3).value
Sheets("sayfa2").cells(sonsatir2+1,2).value = sheets("Sayfa1").cells(i,4).value
End if
Next i
End sub
Yukarıdaki play işaretine basarsanız işlem tamamlanır. Telefondan yazıyorum olmazsa yazın bilgisayardan bakayım.
- materyalist imam (08.08.20 23:14:45)
en kolay yolu makro ile yapman.
www.youtube.com
eğer istersen bir de
pivot tablo ile yapıp her liste değiştiğinde refreshleyebilirsin. veya uğraşmam dersen sheete her değişiklik olduğunda pivotu refresh etmeyi trigger edecek bir ufak makro koyabilirsin.
www.youtube.com
eğer istersen bir de
pivot tablo ile yapıp her liste değiştiğinde refreshleyebilirsin. veya uğraşmam dersen sheete her değişiklik olduğunda pivotu refresh etmeyi trigger edecek bir ufak makro koyabilirsin.
- biseysorucam (08.08.20 23:21:44 ~ 23:29:17)
1
