nasıl saati ve dakikayı ayırırırım?

[akaraman]

Ekte verdiğim tablodaki saat miktarlarının ondalıktan sonraki kısmı dakika önceki kısmı saatleri gösteriyor.

50 saat üzeri kalan kısımlar için ücret hesaplaması yapmak istiyorum. Formül koyamadım. Formülde bana yardımcı olur musunuz?

Dosyaya bakarsanız ne anlatmak istediğimi daha kolay görebilirsiniz.

Şimdiden teşekkür ederim.

Herkese selamlar...

 

[veyselemre]

fonksiyonu bir modüle kopyalayın,
d4 hücresine =hesapla(C4) yazıp aşağı doğru kopyalayın.
[vb:1:d656d20fa7]Function hesapla(veri)
If veri > 50 Then
fazla = veri - 50
tutar = Int(fazla) * 50 + (fazla - Int(fazla)) * 100 * 50 / 60
End If
hesapla = tutar
End Function[/vb:1:d656d20fa7]

 

[kombo]

Veya
D4 hücresine aşağıdaki formülü yazıp aşağı doğru çekerek kopyalayın;

=EĞER(C4>50;(TAMSAYI(C4-50)*50+((C4-TAMSAYI(C4-50)-50)/60)*5000);"")

 

[akaraman]

veyselemre Visual Basic Kodu'nu dediğin gibi modüle nasıl kopyalarım bilmiyorum onu, öğrenmek de isterim , kombo dostum verdiğin formül işimi gördü çok teşekkür ederim. :bravo: