Birer Adet Azalarak Seri Oluşturma

52779 · 11 Haz 2023

Birer Adet Azalarak Seri Oluşturma isimli sorumuzda, azalta azalta beş ayrı serinin nasıl oluşturulacağının cevabı aranmaktadır.

1 - 2 - 3 - 4 - 5 sayılarından başlangıçta azaltma olmadan 1 - 2 - 3 - 4 - 5 ve sonrasında her defasında birer adet azaltarak (bir önceki serinin ilk sayısını eleyerek) resimdeki gibi seri oluşturacağız.

Yani;
İlk aşamada 1 - 2 - 3 - 4 - 5
2. aşamada 2 - 3 - 4 - 5
3. aşamada 3 - 4 - 5
3. aşamada 4 - 5
Son aşamada 5

Bu seriyi oluşturabilmek için nasıl bir Formül / KTF / Kod kullanmalıyız.

Katılımlarınızı beklerim

Not : Dosya eklemenin gerekmediğini düşünüyorum.

ExcelDepo · 11 Haz 2023

Kod:

İndirmek için giriş yapmanız gerekmektedir.
(1 satır)

Hocam benim çözüm uzun ve biraz manuel..
Daha kısa nasıl olur halini merak ediyorum.

Mehmet · 11 Haz 2023

Merhabalar, Bence asıl çözüm reduce-sıralı-bırak işlevleri ile olmalı ama reduce ile yapamadım o yüzden benim de çözümüm şöyle

Kod:

İndirmek için giriş yapmanız gerekmektedir.
(1 satır)

Dinamik hali de şöyle;

Kod:

İndirmek için giriş yapmanız gerekmektedir.
(1 satır)

52779 · 11 Haz 2023

@admin

admin' Alıntı:
Hocam benim çözüm uzun ve biraz manuel..
Daha kısa nasıl olur halini merak ediyorum.

Bence çok güzel çözüm. Çok Teşekkür ediyorum.

Daha kısa mı olur bilemem ama,

SIRALI(5);SIRALI(4;;2)
şeklinde giden serinin, y değişkeniyle yazılmasını SIRALI(5-y;;y+1) şeklinde yaparsak ve y değişkenini de 0 dan başlatırsak
REDUCE işleviyle şöyle yapılabilir.

=BIRAK(REDUCE(0;SIRALI(5;;0);LAMBDA(x;y;DÜŞEYYIĞ(x;SIRALI(5-y;;y+1))));1)

@Mehmet
Bu güzel çözüm için çok teşekkürler....

Mehmet' Alıntı:
Bence asıl çözüm reduce-sıralı-bırak işlevleri ile olmalı

REDUCE işleviyle belki şöyle yapılabilir.

=LET(a;SIRALI(5);BIRAK(REDUCE(0;a-1;LAMBDA(x;y;DÜŞEYYIĞ(x;BIRAK(a;y))));1))

Mehmet · 11 Haz 2023

Sn. @52779 Reduce işlevi ile çözümünüz ve açıklamalarınız için çok teşekkür ederim.. Sn. @admin in yatayyığ-sıralı çözümünü de sıralı işlevini lambdaya tanımlayarak şöyle bir alternatif de oluşturayım istedim.

Kod:

İndirmek için giriş yapmanız gerekmektedir.
(1 satır)

52779 · 11 Haz 2023

Mehmet' Alıntı:
=LET(a;SIRALI(5);b;SIRALI(;5);c;MOD(a-1;5)+b;SÜTUNA(EĞER(c>5;ş;c);3))

Bu GÜZEL çözüme, bir çeşitleme olarak

=LET(a;SIRALI(5);b;SIRALI(;5);c;(0*a+b)*(a<=b);SÜTUNA(c/(c>0);3))

Burada, SIRALI(5) <= SIRALI(;5) özelliğinden yararlanıldı.
ya da aynı mantıkla

=LET(a;(SIRALI(5)<=SIRALI(;5))*SIRALI(5;5);MOD(SÜTUNA(a/(a>0);3)-1;5)+1)

52779 · 11 Haz 2023

Mehmet' Alıntı:
Reduce işlevi ile çözümünüz ve açıklamalarınız için çok teşekkür ederim.. Sn. admin in yatayyığ-sıralı çözümünü de sıralı işlevini lambdaya tanımlayarak şöyle bir alternatif de oluşturayım istedim.

Çok teşekkür ediyorum..

ExcelDepo · 11 Haz 2023

Tüm çözümlerin eklendiği dosyayı da indirmek isteyen kullanıcılarımıza yönelik ekleyelim.

FerhatCK · 11 Haz 2023

Bir alternatifde benden olsun formül belki kısaltılabilir

Kod:

İndirmek için giriş yapmanız gerekmektedir.
(1 satır)

Ömer BARAN · 12 Haz 2023

KTF alternatifi de benden olsun.
Kodu, belgenizde boş/uygun bir MODUL içerisine yapıştırın.

İlk hücreye =AZALAN_SERI(5) şeklinde formül uygulanması yeterlidir.

VBA:

İndirmek için giriş yapmanız gerekmektedir.
(5 satır)

kmlzdmr · 12 Haz 2023

@52779 güzel bir soru olmuş. Teşekkür ederiz. Excel 365 Harici bir çözüm varmıdır?

Ömer BARAN · 12 Haz 2023

@kmlzdmr
Ya A1 hücresine hedef sayıyı (5) yazıp formülün aşağıdaki halini,
ya da formüldeki $A$1 gördüğünüz kısımların 5 olarak değiştirilmiş halini
B2 hücresine uygulayıp boş sonuç alıncaya kadar aşağı doğru kopyalayın.

Kod:

İndirmek için giriş yapmanız gerekmektedir.
(1 satır)

52779 · 12 Haz 2023

kmlzdmr' Alıntı:
@52779 güzel bir soru olmuş. Teşekkür ederiz. Excel 365 Harici bir çözüm varmıdır?

Çok teşekkür ediyorum.
@Ömer BARAN Bey cevapladığı için kendilerine Teşekkürler....

Ben de, #6 mesajda vermiş olduğum formülü, Excel2010 ve üzeri versiyonlar için yazarsam,
#6 mesajda vermiş olduğum formül aşağıdaki gibidir..

52779' Alıntı:
=LET(a;(SIRALI(5)<=SIRALI(;5))*SIRALI(5;5);MOD(SÜTUNA(a/(a>0);3)-1;5)+1)

Kod:

İndirmek için giriş yapmanız gerekmektedir.
(1 satır)

Burada
{0\1\2\3\4} : 0 dan 4 e kadar Satır No (\ işareti satırlar) yani SATIR($1:$5)-1
{1;2;3;4;5} : 1 den 5 e kadar Sütun No (; işareti sütunlar) yani SÜTUN($A$1:$E$1)
ifade etmektedir.

Eğer bu diziler yerine SATIR ve SÜTUN olarak yazarsak formül aşağıdaki şekildeki gibi olacaktır.

Kod:

İndirmek için giriş yapmanız gerekmektedir.
(1 satır)

Burhan.cesur · 12 Haz 2023

Ben de alternatif dinamik yapı paylaşayım

=LET(xd;5;TOCOL(MAKEARRAY(xd;xd;
LAMBDA(r;c;LET(a;ABS(SEQUENCE(;xd;-xd-1));
INDEX(SEQUENCE(;INDEX(a;1;r)-1;r);1;c))));3;0))

	İstenen Adet Benzersiz ve Sıralı Sayılar Üretme ahmetkaraaslan 28 Ağu 2024 Beyin Fırtınası
	Listedeki Elemanların Kümülatif Adetlerini Bulma ahmetkaraaslan 17 Ara 2023 Beyin Fırtınası
	Büyük Küçük Harf Adetlerini Bulma ahmetkaraaslan 30 Eki 2023 Beyin Fırtınası
	En Çok Tekrar Edenleri ve Adetlerini Bulma senol5777 1 Ara 2023 Beyin Fırtınası
	Adet Sayma Ve Sıra Numarası Verme ahmetkaraaslan 21 Ağu 2023 Beyin Fırtınası

Birer Adet Azalarak Seri Oluşturma

Kısa Açıklama