Formülü Koda Çevirmek

[yavuz829]

Merhaba Arkadaşlar eklediğim Formülü koda nasıl çevirebilirim.

=Eğer(TextBox7<TextBox66;TextBox67-TextBox66;Eğer(TextBox7>TextBox66;””)

 

[muratboz06]

if TextBox7.value < Textbox66.value then

    msgbox textbox67.value - textbox66

elseif textbox7.value > textbox66.value then

    msgbox ""

end if

 

[yavuz829]

Çok teşekkürler Hocam ellerinize sağlık.

TextBox8 >0 ise

TextBox9=TextBox10-TextBox11

TextBox8 <0 ise

TextBox9""

Hocam size zahmet olacak yazdıklarımı da koda çevirirseniz sevinirim. Saygılarımla.

 

[muratboz06]

if TextBox8.value > 0 then

  textbox9.value = textbox10.value - textbox11.value

elseif textbox8.value <0 textbox66.value then

 textbox9.value = ""

end if

 

[yavuz829]

Çok, çok teşekkürler Hocam ellerinize sağlık.

Saygılarımla sağlıklı günler diliyorum.