Kritere göre hesaplama yapması

[millis]

Sayın Üstadlar ve Arkadaşlar; Ekli dosyada yapmak istediğim olayı anlatmaya çalıştım. Word dosyasında. İlgilenenlere şimdiden teşekkür ediyorum ve yardımlarınızı bekliyorum.

 

[Mustafa MUTLU]

Versiyonun 2003 mü ?..

 

[millis]

Versiyonun 2003 mü ?..[/QUOTE
evet versiyon 2003

 

[Mustafa MUTLU]

1 - Yapılan poliçe araç sigortası ise bu kriteri baz alıp net primden ( kayıt sayfasında) %7 hesaplaması

Bu hesaplama Rapor sayfasına Toplam olarak mı alınacak ?...

2 - eğer araç sigortası değilse, Örneğin ( İş yeri, Ev, Dask vb. ) Net prim üzerinden %14 hesaplamasını

Burada veri girişlerinde eşitleme yapmak zor olacak çünkü plaka giriyorsun
Eğer sabitlerin ( İş yeri, Ev, Dask ) değişmiyorsa eşitdeğil olarak çözebiliriz.

3 - ve bunu da RAPOR sayfasına ( N2 ve O2 ) ye yazmasını istiyorum

Toplam mı yazacak yoksa sen rapor mu alıyorsun Rapor sayfasına
Rapor alıyorsan her satırın N ve O sütununa alabiliriz.
Yok rapor almıyorum Toplamı lazım diyorsan toplamıda alınabilir.

Birde %7 yada %14 derken bürütten mi Netten mi alınacak ?...

 

[millis]

1 - Yapılan poliçe araç sigortası ise bu kriteri baz alıp net primden ( kayıt sayfasında) %7 hesaplaması

Bu hesaplama Rapor sayfasına Toplam olarak mı alınacak ?...

2 - eğer araç sigortası değilse, Örneğin ( İş yeri, Ev, Dask vb. ) Net prim üzerinden %14 hesaplamasını

Burada veri girişlerinde eşitleme yapmak zor olacak çünkü plaka giriyorsun
Eğer sabitlerin ( İş yeri, Ev, Dask ) değişmiyorsa eşitdeğil olarak çözebiliriz.

3 - ve bunu da RAPOR sayfasına ( N2 ve O2 ) ye yazmasını istiyorum

Toplam mı yazacak yoksa sen rapor mu alıyorsun Rapor sayfasına
Rapor alıyorsan her satırın N ve O sütununa alabiliriz.
Yok rapor almıyorum Toplamı lazım diyorsan toplamıda alınabilir.

Birde %7 yada %14 derken bürütten mi Netten mi alınacak ?...

Rapor sayfası dediğim sadece KAYIT sayfasındaki net prim üzerinden hesaplama yapıp belirtmiş olduğum RAPOR sayfasına Trafik sigorta hesaplama tutarı % 7 ( N2 ) ye, İş yeri, Ev, Dask hesaplamasını da % 14 ( O2 ) ye yazmasını istiyorum. Toplam miktar olarak. Ve İş yeri, Ev, Dask, Ferdi Kaza, Seyahat gibi sigortalar sabit tir.

 

[Mustafa MUTLU]

Kayıt sayfasına Plaka ( 34ZP1234 ) yerine "ARAÇ SİGORTASI" yazılsa
yada Kayıt Sayfasının O sütununa SİGORTA TÜRÜ başlığı atıp
altına Sigorta türünü girmek daha mantıklı olur ve Rapor almada kolaylık sağlar.

ne dersin O sütununa sigorta türü girerim diyorsan ona göre kod hazırlayım..

 

[millis]

Kayıt sayfasına Plaka ( 34ZP1234 ) yerine "ARAÇ SİGORTASI" yazılsa
yada Kayıt Sayfasının O sütununa SİGORTA TÜRÜ başlığı atıp
altına Sigorta türünü girmek daha mantıklı olur ve Rapor almada kolaylık sağlar.

ne dersin O sütununa sigorta türü girerim diyorsan ona göre kod hazırlayım..

Olur. Ozaman bende KAYIT User Formuna Tür diye bir ComboBox koymam lazım ki kayık yaparken ordan seçim yapayım ve KAYIT sayfasına O sütununa sigorta türünü atsın. Mantıklı bencede. Tşk.ederim.

 

[Mustafa MUTLU]

O sütununa Sigorta türünü yazdığınızı varsayarak

Sub MUSTAFA()
Dim MM, MSTF, MUTLU
MUTLU = "ARAÇ SİGORTASI"
Application.ScreenUpdating = False
Sheets("RAPOR").Range("DA2:FR65536").ClearContents
MM = 2
For MSTF = 4 To Sheets("KAYIT").Cells(65536, "A").End(xlUp).Row
If Sheets("KAYIT").Cells(MSTF, "O") = MUTLU Then
[RAPOR!N2] = [RAPOR!N2] + (Sheets("KAYIT").Cells(MSTF, "L") * 0.07)
Else
[RAPOR!O2] = [RAPOR!O2] + (Sheets("KAYIT").Cells(MSTF, "L") * 0.14)
End If
Next
Application.ScreenUpdating = True
MsgBox MUTLU & " Görevlerini Aktardım", vbInformation, "Bitiş"
End Sub

ARAÇ SİGORTASI yazılanlaru %7 ile diğerlerini %14 ile hesaplayıp toplar.
Bu kodu deneyin

 

[millis]

O sütununa Sigorta türünü yazdığınızı varsayarak



ARAÇ SİGORTASI yazılanlaru %7 ile diğerlerini %14 ile hesaplayıp toplar.
Bu kodu deneyin

Üstad kusura bakmayın ancak ben ekledim fakat işlem yapmadı sanırım yada yanlış bir yere ekledim. eğer ekli dosyada siz eklerseniz sevinirim. Size zahmet olmaz ise.

 

[millis]

Yanlız üstad; her seferinde toplayarak miktarları RAPOR sayfasında hücreye yazıyor.

 

[millis]

Yanlız üstad; her seferinde toplayarak miktarları RAPOR sayfasında hücreye yazıyor.

Bu sorunu çözdüm üstad. Her Kayıt sayfasını açtığımda bir o kadar daha miktarı ekliyerek yazıyordu RAPOR sayfasına ancak Module yazarak onu engelledim. Şimdi normal çalışıyor. Teşekkür ederim size.