Yemek Maliyeti'nde en ucuzu ve en pahalıyı renklendirme

[1Al2Ver]

Merhabalar, Gruplandırılmış Yemeklere ait en pahalı ve en ucuz maliyeti bir excel sayfasında buluyorum,bulunan hücreleri de kendi arasında en pahalı ve en ucuz diye manuel renklendiriyorum, veriler Ek'li örnekteki gibi kısa değil, 600 adet yemek çeşidi ve 10 grup oluyor, hücrelerdeki hesaplamalar tabi formül ile yapıldı, VB ile hem hesaplama hem de renklendirme mümkün mü? Yardımlar için teşekkür ederim.

 

[cebir]

merhaba...
"E" ve "L" sütunlarındaki hesaplamaları ("D" sütununda veriler olmak şartıyla)aşağıdaki kodlarla yapabilirsiniz.

Private Sub CommandButton1_Click()
For X = 6 To [A2000].End(3).Row
If Cells(X, 1) > "" Then
Cells(X, 5) = Cells(X, 4) * Range("e2").Value / 100
Cells(X, 6) = Cells(X, 4) * Range("f2").Value / 100
Cells(X, 7) = Cells(X, 4) * Range("g2").Value / 100
Cells(X, 8) = Cells(X, 4) + Cells(X, 5) + Cells(X, 6) + Cells(X, 7)
Cells(X, 9) = Cells(X, 8) * Range("ı2").Value / 100
Cells(X, 10) = Cells(X, 8) + Cells(X, 9)
Cells(X, 11) = Cells(X, 10) * Range("K2").Value / 100
Cells(X, 12) = Cells(X, 10) + Cells(X, 11)
End If
Next
End Sub

ancak ortalama değerler tablosu biraz karışık..
"P" sütunundaki satırlar aşağı inildike "çorba"tablosundan
"et" tablosuna geçip "et yemekleri"fiyatlarından değer alıyor,ortalama değerler neye göre hesaplanıyor?
bu yüzden yarım kaldı

 

[1Al2Ver]

sayın cebir, iyi akşamlar, öncelikle emeğinize teşekkür ederim, kodu birazdan gireceğim, sorunuza gelince ; "P" sütunundaki değerler kendi grupları arasında değer alıyor, örneğin çorba için "çiğ maliyet tutarı" örnek tabloda D6;D16 nın ortalamasını alıp "P6" hücresine yazıyor, bu mantıkla devam ediyor, kod istememin sebebi, 1)tabloya her yemek ilave ettiğinizde, şu an gizli olan "M" ve "N" sütunlarına "C" sütununa girdiğim bilgi için "N" sütununa, "D" sütununa girildiğinde de "M" sütununa bilgi girmemek - bu bilgiler birbirinin aynı zaten- 2)En pahalı ve en ucuz hücrenin renklenmesi 3) Ortalama için sıkıntı olmayabilir, çünkü hesaplaması zor değil, tekrar teşekkür ederim,

 

[cebir]

merhaba
P6 "d6:d16"dan
p7 "d7:d17"den
p8 "d8:d18"den alıyor ..
benim demek istediğim d17-d18 "et" tablosunda olduğu
bunda bir sakınca yoksa yukarıdaki kod a eklemelerle
devam edilebilir.

 

[1Al2Ver]

merhaba
P6 "d6:d16"dan
p7 "d7:d17"den
p8 "d8:d18"den alıyor ..
benim demek istediğim d17-d18 "et" tablosunda olduğu
bunda bir sakınca yoksa yukarıdaki kod a eklemelerle
devam edilebilir.

selam sayın cebir, sakınca yok, mesajın ekindeki ortalamayı yanlış hücrelerden yapmıştım, düzelttim (P6 = D6;D16 P7= E6:E16 P8= F6:F16 ' dan ortalama almakta), gönderdiğiniz kodu "sayfa1" e yazdım, "sayfa1"e bir düğme ekledim, ne denediysem macro'yu atayamadım, tabi sonuçta da hesaplamayı yaptırtamadım, bir de hesaplamalara kaynak olan yüzde'ler (7, 5, 3 vb ) değişken olabiliyor, bu rakamların manuel girilmesi ile kod çalışmayabilir mi ? Şayet öyle ise buna izin veren bir kod gerekecek sanırım, size zahmet olmayacaksa "sayfa1" e bir "hesapla" butonu atarmısınız? Tekrar teşekkür ederim, saygılarımla

 

[cebir]

hayır manuel girilmesinde sakınca olmaz..
eki inceleyin..daha sonra eklemelere devam edebiliriz.
eklediğim dosyada açılşta sayfa2 ve buton görüntüleniyor denemeydi. sayfa1 i seçiniz.

 

[1Al2Ver]

Sayın cebir, tekrar merhaba, çok güzel olmuş, ellerinize sağlık, gecenin bu saatinde benim için emek sarf ediyorsunuz, sağolun varolun, CommannButton'u "B1-B2" sütularının olduğu yere küçültüp koyabilirmiyiz ve zahmet olmaz ise ve olabiliyorsa, "C1-C2" kolonuna hesaplananları silen bir "SİL" butonu koyalım mı ? Saygılar sunarım.

 

[cebir]

yukardaki dosya değiştirildi.

 

[1Al2Ver]

yukardaki dosya değiştirildi.

Sayın cebir, tekrar merhaba, elinize sağlık, dosya'da bazı gerekli ve ihtiyari düzenlemeler gerekiyor, bunları ek'li dosya'da, sayfa1'de belirttim, ortalama için sıkıntı satır eklendiğinde satırın aşağıya doğru açılmasıyla en sağdaki (M,N,O, vb) kolonlarda boşluk meydana geliyor, bu da manuel halledilebilir, ancak ek'li dosyadaki örnek tablo şekil olarak daha estetik ve daha işlevsel,

Tablonun bu hale getirilmesi tamamen sizin inisiyatifinizdedir, ne uygunsa öyle olsun, benim için hesaplama yapması, yemeklerin kendi grupları arasında A'dan Z'ye alfabetik sıralanması, yazıcı çıktısı, pahalı ve ucuz olanın ayrı ayrı renklendirilmesi çok daha önemli,

Zahmetleriniz , sabrınız ve yaratıcılığınız için sonsuz teşekkürler ederim, saygılarımla.

 

[cebir]

sn 1al2ver merhaba...
ek i inceleyiniz..

ekte yazdırma şekli isteğiniz giderildi...

sayfadaki b sütunu değişken (yemek adları ve c de gibi çeşitleri gibi), adedinde garanti yok.. (ilk ve son mesajlarınıza göre), sıralama ve renklendirmeye uygun değil
"yemek" adları sayfalara bölünse ve "yazdır" adlı sayfaya
aktarılıp yazdırılsa daha kolay olabilir.

 

[1Al2Ver]

sn 1al2ver merhaba...
ek i inceleyiniz..

ekte yazdırma şekli isteğiniz giderildi...

sayfadaki b sütunu değişken sıralama ve renklendirme
yemek adları sayfalara bölünse ve "yazdır" adlı bir sayfaya
aktarılsa daha kolay olabilir.

Sayın cebir,
Teşekkür ederim, yeni bir öneri Ek'i hazırladım, incelerseniz sevinirim, tüm ilaveleri ve düzeltmeleri "kullanıcı kolaylığı" ve estetik olması adına istedim, tabi sizin için de uygunsa, kullanıcı dostu olsun derken sizi de fazlaca yormasın, sonuçta istenilen bir önceki ek ile veya bu ek ile de elde edilebiliyor, ancak ben de biraz da "iyisi olsun" saplantısı var, bir kez olsun ve "tam olsun" istiyorum ve siz de de bunu hissettim , yine de sizi yormasın, herşey için tekrar teşekkürler, saygılarımla.

 

[cebir]

sn 1al2ver merhaba...
eki inceleyin.

 

[1Al2Ver]

sayın cebir, iyi sabahlar, bir önceki hali işimizi görür, emeğinize ve sabrınıza teşekkürler, saygılar..

 

[cebir]

merhaba..
ekteki dosyaya "d" sütununa göre "b" ve "L" sütun aralığını
sıralayan button eklendi ortalama satırı işi bozuyor.
("b" ve "c" sütunlarına görede sıralama yapılabilir di.)
"ucuz" yemek başa geldiğinden o hücreler renklendirilirse
ucuz yemek her zaman renkli hücrelerde olabilir.

 

[1Al2Ver]

Merhaba, zahmet etmişsiniz, sağolun, önce bir hatayı sunuyorum ;

E19:L19 ve E31:L31 hücrelerindeki ortalamalar hesaplanmıyor, önceki Ek'te vardı,

1)Sıralamayı manuel yapabiliyorum, burada sorun Alfabetik (A dan Z'ye) sıralarken Çorba gurubunda olan "C6" ve Et gurubunda olan "C20" sütunları- ki bunlar gurupların ilk satırları - sıralamada olması gereken yerlerini alamıyor, diğerlerinde sorun yok, bu sorunu aşarsak "sırala" butonuna gerek yok,

2)Ucuz yemeğin grubu içinde sabit kalması zor, nedeni ; zaman içerisinde o yemek kullanılmayabilir, yerine başka yemek gelebilir vb.

Önem arz eden konu ;

1) Şayet en pahalı ve en ucuz yemek satırları renklenemiyor ise , "R" sütununa en pahalı ve en ucuz yemeklerin sıra numaralarının gelmesi
2) Sıralamayı manuel sorunsuz yapabilmek

Teşekkür ederim.

 

[abidinn]

yükleme yapamıyorum

Sayın cebir,
Teşekkür ederim, yeni bir öneri Ek'i hazırladım, incelerseniz sevinirim, tüm ilaveleri ve düzeltmeleri "kullanıcı kolaylığı" ve estetik olması adına istedim, tabi sizin için de uygunsa, kullanıcı dostu olsun derken sizi de fazlaca yormasın, sonuçta istenilen bir önceki ek ile veya bu ek ile de elde edilebiliyor, ancak ben de biraz da "iyisi olsun" saplantısı var, bir kez olsun ve "tam olsun" istiyorum ve siz de de bunu hissettim , yine de sizi yormasın, herşey için tekrar teşekkürler, saygılarımla.

 

[pogimist]

dosya indirme

merhaba
ben ekli dosyayı indiremiyorum bir sorunmu var acaba
yardım rica edicektim
teşekkürler

 

[irfancantr]

merhaba
ben ekli dosyayı indiremiyorum bir sorunmu var acaba
yardım rica edicektim
teşekkürler

2008 yılı öncesindeki bazı dosyalar forumdan istenmeyen sebeplerden dolayı silinmiştir.Yüklemeyi daha önceden kendi bünyesinde saklayan forum üyelerinin tekrar yüklemesini beklemeliyiz.

 

[cemsultan]

hocam dosya yüklenmiyor malesef(