yüzde hesaplama

[Fuat Şirin]

arkadaşlar
örneğin
1000 den 900 çıkartıp
aradaki farkın yüzdesini %10,00 gibi bulmak için gerekli kod nedir
textboxta yapıcam bu işlemi

 

[kundakci]

=(1000-900)/1000

 

[Fuat Şirin]

hücrede değil

ben textboxta yapmak istiyorum bunu
formda yani

 

[ahseng]

yüzde yazıp arama yaparsan aşağıdaki kodları bulursun.

TextBox1.Value = Format(TextBox1, "0%")
Sheets("sayfa1").Range("a2").Value = TextBox1.Value
------------------------------
Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox2.Text = TextBox2.Text & "%"
[a1] = TextBox2.Text
End Sub

Private Sub TextBox1_Change()
[a1] = TextBox1.Text & "%"
End Sub

--------------------------------
texbox1.value*5
yerine
val(textbox1)*5 kullanın

 

[excelboy]

Merhaba.Çok basit bir örnek oldu ama belki fikir sahibi yapabilir.İyi çalışmalar

 

[Fuat Şirin]

çok teşekkür

sayenizde sorunumu halletim
yardımcı olan herkese tşk
bu platformdaki dayanışma herkese örnek olsun