اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

وعليكم السلام :rol:

 

كل رسالة خطأ ، لها رقم ، وتظهر الرسالة في اماكن مختلفة ،

فاذا عرفت الحدث الذي تطلع الرسالة فيه ، وما يهمك تحل سبب الرسالة ، تستطيع ان تضع السطر التالي على السطر الثاني من الحدث:

Private sub ......
on error resume next

 

جعفر

قام بنشر (معدل)

أستاذي الكريم / السلام عليكم ورحمة الله  جزاكم الله خيرا على سرعة تلبيتك لطلبي 

مرفق صورة للرسالة التي تظهر لي وذلك بسبب حدث عند الطباعة في تقرير عند فتح حيث أطلب منه إذا كان الحقل في التقرير قيمته س مثلا يخفي هذه القيمة وغير ذلك تظهر القيمة وهو هكذا 
If A.Value = "Pen" Then
Me.A.Visible = False
Else
Me.A.Visible = True
End If
بمعنى إذا كانت قيمة الحقل A تساوي Pen أخفي القيمة وإلا أظهر القيمة . وذلك كله في التقرير 

فإذا كان التقرير فارغ تماما تظهر هذه الرسالة 

فهل لديك كود أفضل من هذا وجزاكم الله خيرا 

untitled.JPG

تم تعديل بواسطه ahlamy90
ارفاق الصورة

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information