[عبد العزيز البسكري]

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

معك حق أخي الغالي .. بارك الله فيك على الملاحظة القيّمة

فيما يخص عدد الحجرات فهو غير مضبوط يمكن أن يكون 10 أو حتّى 20

أمّا عدد المراقبين فلا يمكن أبدا أن يتعدّى 3 ( رئيسي و مراقب 1 و مراقب 2 ) مثلما أشرت سابقًا

و لذلك ربّما سأحتاج إلى جملة شرطيّة مثل هذه ببداية كود زر أمر الإجراء :

كود :

If Val(Trim$(Text200.Text)) > 2 Then
MsgBox "عدد المراقبين أكبر من اثنين", vbOKOnly + vbExclamation, "تنبيه"
Text200.SetFocus
Exit Sub
End If

 

بارك الله فيك مرة ثانية أخي " SENDBAD100 " على نيّة المساعدة

إحتراماتي