Çözüldü Değer ve Aralık Toplamlarını Karşılaştırma

Refaz68' Alıntı:

@PriveT hocam formülünüzü makro kaydet ile koda çevirdim.Yolladığınız dosyada hata vermiyor.
Fakat alttaki dosyada hata veriyor sebebi nedir acaba?

VBA:Panoya kopyala

Görüntülemek için giriş yapmalısınız.
(5 satır)

Genişletmek için tıklayın ...

Malesef Makro"nun M"sini bilmiyorum. Ama bir makro uzmanımız sorunuzu farkederse çözüm bulacaktır.

Tekrar merhaba.
Madem makro ile çözüm arayacaksınız aşağıdaki kodu kullanabilirsiniz.
A sütununda harf hücreleri dışındakilerin boş ve 0 olması sonucu değiştirmez.

Makro ile çözüm önerim bir önöceki cevabımda.
Makro kullanarak dizi formülü oluştururken aşağıdaki yöntemi kullanmanızı öneriyorum.

Ömer hocam aslında bende 23.cü mesajınızda kullandığınız kodun benzerini kullanacaktım.
Fakat Makro Kaydet ile elde edilen kodu ormal Formula olayına çevirmek mesele.
Hata olmasaydı alttaki gibi yapacaktım esasında son yolladığım dosyaya göre.
Hata koddaki 100000 gibi yerleri 1000 gibi yaparsam hata olmuyor lakin 100000 gibide hata veriyor.Anlamadım gitti.

Bir formül, bir de bu formüllerle sonuç alınması yönteminin uygulandığı makro alternatifi ekleyeyim.
A sütununda harf olmayan hücrelerde 0 değerinin olduğu varsayıldı.
1) Formül uygulaması:
A sütununda, B sütununun son veri hücresinin bir alt satırına (örnek belgeye göre A15 hücresine)
BOŞLUK karakteri veya herhangi bir METİN yazdıktan sonra;
-- E4 hücresine (dizi formülü)

=EĞER(A4=0;B4*KAYDIR($B$1;BÜYÜK(EĞER($A$3:A4<>0;SATIR($A$3:A4));1)-1;0);"")

Genişletmek için tıklayın ...

-- C3 hücresine (dizi formülü)

=ARA(1*(TOPLA(KAYDIR(D3;1;0;EĞER(EMETİNSE($A4);KÜÇÜK(EĞER(EMETİNSE($A5:$A$15);SATIR($A5:$A$15));1)-SATIR(); )))-TOPLA(KAYDIR(E3;1;0;EĞER(EMETİNSE($A4);KÜÇÜK(EĞER(EMETİNSE($A5:$A$15);SATIR($A5:$A$15));1)-SATIR(); )))<>0);{0;1};{"+";"-"})

Genişletmek için tıklayın ...

2) Formül uygulama ve değere dönüştürme şeklinde çalışan makro uygulaması:

Ömer hocam 20.ci mesajdaki dosyaya görede mokrolu kodu uygulayabilirmisiniz.Ben biraz zor yaparım.

A sütununda, B sütununun son veri hücresinin bir alt satırına (örnek belgeye göre A15 hücresine)
BOŞLUK karakteri veya herhangi bir METİN yazdıktan sonra;

Genişletmek için tıklayın ...

Birde buraya neden yazılacak.Kodlu örneğiniz içindemi yapılması gerek bu işlem.Ve 20.ci mesajda neden hata veriyor abey.

Ömer hocam kusura bakmayın son defa resimdeki gibi sorayım.Böyle daha anlaşılır olacak.

Kusura bakmayın ama şu hitap olayını düzeltmekte yarar var.

Eklenen örnek belgeye göre sorunsuz olduğundan emin olmadan formül veya makro cevabı göndermek gibi bir alışkanlığım yok.
Hala, önceki örnek belge üzerinden söylersem; A sütununda metin olmayan hücrelerde 0 değerinin olup olmayacağı bile netleşmiş değil.

Sorunuza gelince; son mesaj ekindekiyle, önceki mesajların ekindeki örnek belgeler tam olarak aynı değil.
Sanırım yine, gerçek belgeyle aynı yapıda olmayan örnek belge üzerinden sorulan bir soruyla karşı karşıyayız.
Zaten tahminim o ki; bu nedenle verilen cevapları gerçek belgenize uyarlamakta sorun yaşıyorsunuz.

Önceki örnek belgelerde;
-- A sütununda yer alan METİN ve 0 değerleri yeni belgede hiç yok (verdiğim formül ve makro cevapları bu sütun üzerinden kurgulanmış idi),
-- veri sütunları ve ilk/son veri satırları tamamen farklı.

Bunlar da; gerek benim ve gerekse de Sayın @PriveT 'in harcadığı emek ve zamanı bir anlamda çöp haline getiriyor.
Kaldı ki; son örnek belgenin de gerçek belgenizle aynı yapıda olduğuna dair bir kanaat da oluşmuyor, doğrusu.

Ömer hocam kusura bakmayın hata bende.Haklısınız.Son yazdığıma göre olacaktı.Bende birine yardım için konu açmıştım benimde kafa çorba oldu
Hayırlı geceler.

Yine de son örnek belgenize göre cevap yazayım dedim.
Üç farklı çözüm seçeneğinin olduğu örnek belge ekte.

Elinize sağlık Ömer hocam süper olmuş.

Ömer BARAN' Alıntı:

Sayın @Refaz68 , yine de son örnek belgenize göre cevap yazayım dedim.
Üç farklı çözüm seçeneğinin olduğu örnek belge ekte.

Genişletmek için tıklayın ...

Ömer hocam son verdiğiniz dosydaki alttaki kodu nasıl değiştirince eğer j deki k dan küçüksede + yazsın.
yani bir şart daha eklenecekmiş şart olarakta J=k ve J<k ise + yazsın
Ben uyguladım yine hata oldu.


Yaptığım kodda alttaki bi or ekledim hata veriyor maliesef.

Verdiğim formüldeki iki TOPLA işlevi arasındaki = işaretini <= olarak değiştirmeniz yeterli olur.

Hiç aklıma gelmedi çok garip
Sağolun.