+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Saat Ücretini Textboxta Göstermek (/konu-saat-ucretini-textboxta-gostermek.html)
Sayfalar:
1
2
Cvp: Saat Ücretini Textboxta Göstermek - m_demir - 25/03/2020
çıkış saatinden çıkınca olayına eklerseniz iyi olur.
Cvp: Saat Ücretini Textboxta Göstermek - berduş - 25/03/2020
forma aşağıdaki 2 olayı ekleyip dener misiniz?
Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Hesapla
End Sub
Function Hesapla()
If Len(TextBox2) > 0 And Len(TextBox3) > 0 Then
BasSure = Split(TextBox3, ":")(0) * 60 + Split(TextBox3, ":")(1) - (Split(TextBox2, ":")(0) * 60 + Split(TextBox2, ":")(1))
TextBox4 = Format(BasSure \ 60, "00") & ":" & Format(BasSure Mod 60, "00")
Ucret = IIf(Len(TextBox1) > 0, TextBox1, 0)
TextBox5 = Round(Ucret * (BasSure / 60), 2)
End If
End Function
Cvp: Saat Ücretini Textboxta Göstermek - m_demir - 25/03/2020
Çok, çok teşekkürler Hocam ellerinize sağlık. Tam istediğim gibi olmuş.
Hocam Konuyu taşıyabilirsiniz. Saygılarımla sağlıklı günler diliyorum.
Cvp: Saat Ücretini Textboxta Göstermek - berduş - 25/03/2020
iyi çalışmalar)