تعديل على كود تحديد بين رقمين

[محمد احمد لطفى]

السلام عليكم ورحمة الله وبركاته 

فى هذا التقربر يحدد اذا كان الرقم الرقم اكبر من 37 بهذا الكود

 

Dim Rcount As Integer
Rcount = DCount("*", "Q1")
If Rcount > 37 Then تفصيل.Height = تفصيل.Height * 1.8

كف اجعل هذا التحديد بين رقمين مثلا من 37 الى 45 

 

test1201.mdb

[محمد احمد لطفى]

شكراً  أستاذ @ابو عارف
 

If Rcount > 37  And Rcount < 100 Then

 

[ابو ياسين المشولي]

4 ساعات مضت, محمد احمد لطفى said:

شكراً  أستاذ @ابو عارف
 

If Rcount > 37  And Rcount < 100 Then

 

ليش مايكون هكذا بدل المية

If Rcount > 37  And Rcount < 46 Then

 

[محمد احمد لطفى]

جزاك الله خيرا أستاذى @ابو ياسين المشولي