Tablo şuna benzer birşey;
C sütunu için formüller şu olmalı;
B1=x ise A1
B2 ve B1=x ise Ortalama(A1+A2)
B3,B2,B1=x ise Ortalama(A1+A2+A3)
B4,B3,B2=x ise Ortalama(A2+A3+A4)
B5,B4,B3=x ise Ortalama(A3+A4+A5), değilse son üç x olan b sütunun, a değerlerinin ortalaması yani Ortalama(A2+A3+A4)
Ortalama(A6+A4+A3)
Ortalama(A6+A4+A3)
Ortalama(A6+A4+A3)
Bu x sütunlarını Eğer ve Ve formülleri ile yapabiliyorum ama y sütunları için tekrar bir Eğer açıp içini ben seçmek istemiyorum kendisi B sütununda son üç x hücrelerinin yanındaki değerleri seçsin istiyorum nasıl yapabilirim?

 

Formül ile olmaz gibi geldi bana. Yukarı doğru istenen sayı kadar X sayılamayabilir.

Makro ile mümkün. İlgili kodu aşağı bırakıyorum. C1 ve C2'yi elle yazmanız gerekir. C3 ve sonrası için makro otomatik çalışır. İlk satırdaki 18 sayısını excel'deki verileriniz bittiği satır sayısı olacarak değiştirin. Yani 500 satır veri varsa o 18, 500 olacak.

For i = 3 To 18

sayac = 0
toplam = 0
j = i

Do Until sayac = 3

If Cells(j, 2) = "x" Then
sayac = sayac + 1
toplam = toplam + Cells(j, 1)
End If
j = j - 1
Loop

Cells(i, 3) = toplam / 3

Next i

himmet dayi

teşekkürler, denedim ama olmadı

bartholomew87

Ben denedim, bende oldu. Ne hata verdi? Yardımcı olayım. İsterseniz Excel'i gönderin ona yazayım direkt makroyu.

himmet dayi

Kusura bakmayın daha önce bakamadım. Dosyayı buradan indirebilirsiniz:
usaupload.com

ya da mail de atabilirim nasıl uygunsa.

bartholomew87

Duyuruda verdiğiniz örnek ile gönderdiğiniz tablo aynı olmadığı için bu makroyu tabloya göre uyarlamadıysanız çalışmaması normal.

Makro eklenmiş tablo: usaupload.com
(Chrome indirmeyi engelleyebilir makro içerdiği için)

Makronun bu tabloya göre güncellenmiş hali:

For i = 4 To 35

sayac = 0
toplam = 0
j = i

Do Until sayac = 3

If Cells(j, 3) = "Green" Then
sayac = sayac + 1
toplam = toplam + Cells(j, 2)
End If
j = j - 1
Loop

Cells(i, 4) = toplam / 3

Next i

himmet dayi

Teşşekürler,

Aslında ben de; For i kısmını ve "Green" kısmını düzenlemiştim ama nedense

'If Cells(j, 2) = "Green" Then' bu kısımda uyarı alıyordum.

bartholomew87
1

mobil görünümden çık