Run Time 13 Hatası

[tamer060]

Arkadaşlar vba da aşağıdaki gibi yüzde hesabanı bulmak için kod yazdım, ancak sil butonu ile veriyi silmek istediğimde run time13 hatası veriyor textbox4 deki veriyi ellede silmek istesem veya kodla bu hatayı alıyorum nerede yanlış yapmışımdır? düzeltmek için ne yapmalıyım.

'Mazot Ortalaması Hesabı
Private Sub TextBox4_Change()
TextBox17.Value = CDbl(TextBox4.Value) / CDbl(TextBox16.Value) * 100
End Sub
textbox 16 = bu texte net km verisi geliyor
textbox 4 = mazot LT sini yazıyorum
textbox 17 = mazot ortalaması çıkıyor.

 

[leumruk]

Merhaba,
Aşağıdaki satırı kodlarınızın başına ekleyin.

if TextBox4.Value="" then Exit Sub

 

[tamer060]

Hocam Çok Teşekkkür ederim 60dk dır. nasıl olacak diye uğraşıyodum sağolun.

 

[leumruk]

Hocam Çok Teşekkkür ederim 60dk dır. nasıl olacak diye uğraşıyodum sağolun.

Rica ederim. İyi çalışmalar...