Soru Textboxta tarih toplama?

[s.savas]

Merhaba arkadaşlar.
Resimdeki verilerde: 4,80 (textbox9) rakamı icra tutarının (textbox7) kesinti tutarına (textbox8) bölüm sonucudur. Bu sonucu ay olarak değerlendirip veya yukarı yuvarlayıp tam sayıya çevirip 10.04.2019 tarihi ile toplayıp sonucu textbox11 toplamak istiyorum.

 

[Ömer BARAN]

Merhaba.
Eklediğiniz belgede, UserForm8'den bahsediyorsunuz sanırım. Sorun şu ki; belgenizdeki bu form açılmaya çalışıldığında Excel kilitleniyor.
Bu nedenle deneme şansım olmadı. Tahmin üzerine aşağıdaki gibi düşündüm, deneyiniz.

TextBox9.Value = FormatNumber(Round((Val(TextBox7.Text) / Val(TextBox8.Text)), 2), 2)
TextBox11 = Format(CLng(CDate(TextBox10)) + Val(TextBox9.Text), "dd.mm.yyyy")

 

[s.savas]

Ömer hocam teşekkür ederim.
Textbox9 da bulunan sonuç küsüratlı ise yukarıya yuvarlanmalı ve ay olarak değerlendirilmeli. (2.resim)
Devamında bulunan sonuç (ay) textbox10 daki ay ile toplanarak textbox11 de gösterilmeli.
Resimde de görüldüğü üzere gün toplanmış.



Excelin kilitlenmesi sanırım; userformlar veritabanı yolunu Sayfa1 deki AY sütunundan alıyor. Bir kez login olunursa kilitlenme ortadan kalkar diye düşünüyorum.

 

[s.savas]

Sn Haluk hocanın ekran kaydetme programıyla alınan video kaydı.