Excel Vba Forum - Excelce.Net

SORU ve CEVAPLAR (Yazılabilir) => Microsoft Excel, Vba, Makro, Formül vb. Soruları => Çözülen Excel, Vba, Makro, Formül vb. Soruları => Konuyu başlatan: jepue - 10 Şubat 2011, 13:43:19

Başlık: talebim arttıkça aralıkta bana sunulan en ugyun çözümü verme !
Gönderen: jepue - 10 Şubat 2011, 13:43:19

Arkadaşla ekte sorunumu anlattım. Çözüm sunabilecek varsa çok teşekkür ederim.


http://rapidshare.com/files/447158707/__RNEK.xlsx

Başlık: Ynt: talebim arttıkça aralıkta bana sunulan en ugyun çözümü verme !
Gönderen: Hüseyin Çoban - 10 Şubat 2011, 14:03:44

Alıntı yapılan: jepue - 10 Şubat 2011, 13:43:19

Arkadaşla ekte sorunumu anlattım. Çözüm sunabilecek varsa çok teşekkür ederim.


http://rapidshare.com/files/447158707/__RNEK.xlsx

Merhaba,

Tablodaki veriler ile ilgili biraz daha açıklama yaparsanız ve sonucu neye göre karşılaştırıp bulunacağını belirtirseniz daha hızlı ve net çözümler alırsınız.

Başlık: Ynt: talebim arttıkça aralıkta bana sunulan en ugyun çözümü verme !
Gönderen: jepue - 10 Şubat 2011, 14:18:38

Alıntı yapılan: Hüseyin Çoban - 10 Şubat 2011, 14:03:44

Merhaba,

Tablodaki veriler ile ilgili biraz daha açıklama yaparsanız ve sonucu neye göre karşılaştırıp bulunacağını belirtirseniz daha hızlı ve net çözümler alırsınız.

Hüseyin bey ,

tabloda G8 hücresi benim sürekli değişen talebim.
Örneğin talebim 5000 olsun , ozaman tablodan manuel olarak bakıp diyorum ki
5000 talep için bana 1 tren lazım,uçağa gerek yok.
Çünkü 5000 sayısı 0-12000 skalası arasında kalıyor.
Bende istiyorum ki talebimi tek tek listeden bakmak yerine ,talebimi girince orda ki skala değerleri arasında ki
kac tren veya ucak gerek onu göreyim.

Başlık: Ynt: talebim arttıkça aralıkta bana sunulan en ugyun çözümü verme !
Gönderen: Hüseyin Çoban - 10 Şubat 2011, 14:48:52

Merhaba, kodlar ve süzme ile yapmak isterseniz ekteki dosyayı inceleyiniz.

H8 hücresine değeri girip. Süz butonunu tıklayınız.

Kod: [Seç]

Sub tümünügöster()
    Selection.AutoFilter
End Sub

Sub süz()
    Range("B10:F10").Select
    Selection.AutoFilter
    Selection.AutoFilter Field:=2, Criteria1:= _
    Sheets("sayfa1").Range("a1").Value, Operator:=xlAnd, Operator:=xlAnd
    Selection.AutoFilter Field:=3, Criteria1:= _
    Sheets("sayfa1").Range("a2").Value, Operator:=xlAnd, Operator:=xlAnd
End Sub
[Forum yazılım güncelleme esnasında sorun oluştuğundan eklendi silinmiştir.]

Başlık: Ynt: talebim arttıkça aralıkta bana sunulan en ugyun çözümü verme !
Gönderen: Hüseyin Çoban - 10 Şubat 2011, 15:54:42

Merhaba, formüller ile yapılmış hali ektedir inceleyiniz.

Not: Değişken tutarı,  en az ve fazla değeriyle aynı olunca nasıl olacak?

Örneğin; 12000 değişkeni  en fazlada 1 tren, en azda 1 uçak. İşlem sonucu 1 tren 1 uçak mı olacak.

Bu işleme göre kodları ve formülleri revize etmek gerekir.

[Forum yazılım güncelleme esnasında sorun oluştuğundan eklendi silinmiştir.]

Başlık: Ynt: talebim arttıkça aralıkta bana sunulan en ugyun çözümü verme !
Gönderen: jepue - 11 Şubat 2011, 13:08:10

Alıntı yapılan: Hüseyin Çoban - 10 Şubat 2011, 15:54:42

Merhaba, formüller ile yapılmış hali ektedir inceleyiniz.

Not: Değişken tutarı,  en az ve fazla değeriyle aynı olunca nasıl olacak?

Örneğin; 12000 değişkeni  en fazlada 1 tren, en azda 1 uçak. İşlem sonucu 1 tren 1 uçak mı olacak.

Bu işleme göre kodları ve formülleri revize etmek gerekir.

Çok teşekkür ederim Hüseyin bey, Sorunuza gelince   
alt değer<DEĞİŞKENTUTAR<=üst değer , 
12000<12001<=25000 olucak.

Başlık: Ynt: talebim arttıkça aralıkta bana sunulan en ugyun çözümü verme !
Gönderen: jepue - 11 Şubat 2011, 13:10:23

Alıntı yapılan: jepue - 11 Şubat 2011, 13:08:10

Çok teşekkür ederim Hüseyin bey, Sorunuza gelince   
alt değer<DEĞİŞKENTUTAR<=üst değer , 
12000<12001<=25000 olucak.

Onu da ben hallettim,
formüller ve mantıgınız için teşekkür ederim.

Başlık: Ynt: talebim arttıkça aralıkta bana sunulan en ugyun çözümü verme !
Gönderen: Hüseyin Çoban - 11 Şubat 2011, 13:27:57

Rica ederim Cihan Bey, iyi çalışmalar.