[حل شده] کوچکتر بودن عددی درتکست باکس فرم اکسل

[mohsenrasti]

با عرض سلام خدمت اساتید محترم
چطور میشه در فرم اکسل دو تا تکست باکس داریم کدی بنویسیم که اگر تکست باکس ۱ مثلا عدد ۱۲۳ بنویسم وتکست باکس ۲ اگر عدد وارد شده بزرگتر از عدد تکست باکس ۱ باشه پیغام بده من این کد رو نوشتم
if textbox2.value>textbox1 then
msgbox "عدد وارد شده بزرگتر است "
end if
ولی اگر عدد ۲ یا ۲۳ یا ۳ و یا هر عددی که بزرگتر از عدد اول تکست باکس ۱ بزاریم مثلا ۱ تا ۹ این پیغام رو میده
ممنون میشم راهنماییم کنید

[میثم مقدم نیا]

با عرض سلام خدمت اساتید محترم
چطور میشه در فرم اکسل دو تا تکست باکس داریم کدی بنویسیم که اگر تکست باکس ۱ مثلا عدد ۱۲۳ بنویسم وتکست باکس ۲ اگر عدد وارد شده بزرگتر از عدد تکست باکس ۱ باشه پیغام بده من این کد رو نوشتم
if textbox2.value>textbox1 then
msgbox "عدد وارد شده بزرگتر است "
end if
ولی اگر عدد ۲ یا ۲۳ یا ۳ و یا هر عددی که بزرگتر از عدد اول تکست باکس ۱ بزاریم مثلا ۱ تا ۹ این پیغام رو میده
ممنون میشم راهنماییم کنید

سلام
دوست عزیز از کد زیر داخل یوزر فرمتون استفاده کنید ببینید به کارتون میاد

Private Sub UserForm_Click()
    Dim x As Integer
    Dim y As Integer

        x = TextBox1.Value
        y = TextBox2.Value
 
    If y > x Then

        MsgBox "عدد وارد شده بزرگتر است "
  
  End If

End Sub 

[mohsenrasti]

مرسی فداتشم خیلی لطف کردی

سلام
دوست عزیز از کد زیر داخل یوزر فرمتون استفاده کنید ببینید به کارتون میاد

Private Sub UserForm_Click()
    Dim x As Integer
    Dim y As Integer

        x = TextBox1.Value
        y = TextBox2.Value
 
    If y > x Then

        MsgBox "عدد وارد شده بزرگتر است "
  
  End If

End Sub 

با عرض سلام خدمت اساتید محترم
چطور میشه در فرم اکسل دو تا تکست باکس داریم کدی بنویسیم که اگر تکست باکس ۱ مثلا عدد ۱۲۳ بنویسم وتکست باکس ۲ اگر عدد وارد شده بزرگتر از عدد تکست باکس ۱ باشه پیغام بده من این کد رو نوشتم
if textbox2.value>textbox1 then
msgbox "عدد وارد شده بزرگتر است "
end if
ولی اگر عدد ۲ یا ۲۳ یا ۳ و یا هر عددی که بزرگتر از عدد اول تکست باکس ۱ بزاریم مثلا ۱ تا ۹ این پیغام رو میده
ممنون میشم راهنماییم کنید

مرسی فداتشم خیلی لطف کردی

[میثم مقدم نیا]

اگر جواب گرفتید
علامت تیک سبز رنگ حل شد در بالای صفحه را برای بستن بزنید
سپاس فراموش نشود