Belirlenen değere göre hesaplama

[egemenpala]

Arkadaşlar Merhaba

Dünde aynı dosyayı yollamıştım. .

Şuan istediğim Excelde yapılabilinir mi bilmiyorum.

Ekteki dosyada,

C6 Hücresine girilen değer ile C22 hücresinde bir hesaplama olmaktadır.
Bu C22 hücresindeki hesaplanan değer c15-c16 hücresindeki değerler ile
kıyaslanmakta ve değer o ararlıkta ise yanda büyükçe görülen metin kutusunda Flote oranı iyi yazmaktadır.

Benim istediğim c6 hücresine girilecek doğru değeri (Flote oranı iyi yi yazdıran değerler) otomatik olarak hesaplatmak mümkünmü.

Şimdiden teşekkürler.

 

[egemenpala]

ya arkadaşlar bunu yapmak mümkünmü.

Onuda bilen yokmu

 

[werhan]

yapılır yapılmaz değil ama çok fazla değişken var ve bir değişken birçok yerde aynen kullanılıyor bence önce biraz sadeleştirmelisin ve gördüğüm kadarı ile Flote oranı bi aralıktan oluşuyor. Anladığım kadarıyla aradığımız Flote Oranı aralığı...

 

[egemenpala]

Arkadaşlar en sade halinle bir sayfa hazırladım.
daha öncekiyle mantık olarak aynı.

Yapmaya çalıştığım olay kısaca şu,
X ve Y değerlerini çarpıp bir sunuç elde ediyoruz.
Bu sonuç verilen aralıkta ise Y değeri doğru, verilen aralıklar dışında ise uyarı veriyor.

Bu verilen aralığa göre Y değerini otomatik hesaplatacak bir formül varmı.

İyi çalışmalar

 

[Ali]

Araçlar-Eklentiler-Çözücü kısmını aktif hale getirin.

Çözücüyü çalıştırın, ben olması gerekeni basit bir şekilde ekteki dosyada gösterdim. Çözücü çalıştırdığınızda eklediğim kısıtlama ve düzenlemeleri göreceksiniz.


Notaha fazla bilgi için Excel Dersanesindeki SOLVER çalışmasını inceleyiniz.

.

 

[egemenpala]

Ali Hocam sağolun,

Dediğiniz şekilde çözüyor.
Fakat Kod olarak bunu yapmak mümkün mü.
Yaptığım sayfayı ileri düzey bilgisayar bilgisi olmayan çalışanlar kullanacak.
Menülere girmek onları biraz kasar.


İyi çalışmalar

 

[Ali]

Sayın Egemenpala,

Size verdiğim dosyanın solver kodları

Sub solver1()
    SolverOk SetCell:="$C$9", MaxMinVal:=1, ValueOf:="0", ByChange:="$C$5:$C$6"
    SolverSolve
End Sub

şeklindedir.


Yalnız bu makroyu çalıştırmak için VBA düzenleyici açın. Tools/Reference kısmından SOLVER referansını etkin hale getirin. Eğer gözükmüyorsa Program Files/Microsoft Office/Office 12/Library/Solver klasörü içinde Solver.DLL dosyasını aç dediğinizde Reference listesine eklenecek ve bu dosyanın soldaki kutucuğunu onaylayarak aktif hale getirmiş olacaksınız.

Siz kendi dosyanızda Makro Kaydeti çalıştırıp, sonrada çözücü ile hesaplama yaptırın. Sonra makroyu durdurun. Böylece kendi dosyanıza özgü solverın makro kodlarını oluşturmuş olacaksınız. Ondan sonra bir butona bu kodları bağladıktan sonra sadece bu butonu kullanarak hesapları otomatik olarak yaptırabilirsiniz.


.

 

[egemenpala]

Ali Bey

Dediklerinizi yaptım.
Çözücüyü aktif hale getirdim.Makroyu oluşturdum.
Fakat bunu nasıl bir butona bağlayacağız. Birde oluşan macro Visual Basicte hata veriyor.
Ben bu konularda çok yeniyim.
Saçma birşey yazıyorsam kusura bakmayın.

 

[egemenpala]

Yokmu yardımcı olacak bir arkadaş

 

[Ali]

Yokmu yardımcı olacak bir arkadaş

Yardımcı oluyoruz ya..

.

 

[egemenpala]

Ali Bey

Yanlış anladınız. Son dediklerinizi yaptım fakat olmadı. Belki doğru yapamadım.
sizden cevap gelmeyince onun için yolladım.
Siz örnek olarak bir excel dosyası oluşturabilirmisiniz.
Sizin için belki çok basit konu, ama benim için çok karmaşık geliyor.

İyi çalışmalar

 

[Ali]

Her zaman bilgisayar başında olmuyoruz.İşlerimiz oluyor. Ne zaman müsait olursak o zaman yazıyoruz. Visual basic solver uygulamalarında referanslar onaylanmadığı müddetçe hata verir. Siz kendi bilgisayarınızda bunu yapacaksınız. Ben dosya göndermem birşeyi değiştirmeyecek.

.

 

[egemenpala]

Ali bey yardımlarınız için teşekkürler.

Benim deyim acemi düzey. Bu nedenle macroyu butona bağlama konusunda bilgisizim. Uzun bir zaman harcamam gerekiyor.
Bu konuda yapılmış anlatımlı bir örnek olsa benim için yeterli olur.

 

[Ali]

Resimde gösterdiğim gibi referansı kendi bilgisayarınızda onaylayın. Ondan sonra Hesapla butonun tıkladığınızda kendisi hesaplayacaktır.



Dosya ektedir.

.

 

[egemenpala]

Ali Bey

İlginiz için teşekkürler.

 

[egemenpala]

Ali bey

Yolladığınız dosya çok güzel çalışıyor.
Fakat her hesapla butonuna basıldığında çözücü sonuçları penceresi açılıyor.
Bu pencereyi açtırmamanın bir yolu varmı.

İyi günler

 

[egemenpala]

Arkadaşlar Ali bey müsait değil galiba,

Başka yardımcı olacak kimse yokmu.

Ali bey

Yolladığınız dosya çok güzel çalışıyor.
Fakat her hesapla butonuna basıldığında çözücü sonuçları penceresi açılıyor.
Bu pencereyi açtırmamanın bir yolu varmı.

İyi günler

 

[egemenpala]

Başka uzman yok galiba bu formda