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

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

قام بنشر

الاخوة الاعضاء

كيف استطيع وفي النماذج التي على شكل ورقة البيانات ان يكون يكون كل صف لون مثلا رصاصي والاخر ابيض ثم رصاصي فأبيض وهكذا بشكل مستمر

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

بسم الله الرحمن الرحيم

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

الأخ sasg:

ستجد طلبك على هذا الرابط ، ضمن الأمثلة المنشورة

http://www.mybiznas.com/access/Top/SpreadExamples/index.htm

وأرجو ممن يدخلون إلى هذا الموضوع مراجعة استفساري التالي

قمت بتطبيق الكود الخاص بتبديل لون السجل الحالي ، إلا أن الكود عمل للسجلات المعروضة في بداية النموذج فقط ، أي أنه تم تلوين السجل الحالي بلون مختلف لأول 21 سجل فقط ، وفشل الكود عند باقي السجلات .

Private Sub Form_Current()

Dim blRet As Boolean

blRet = fScrollInfoCurrentRecord(Me, False)

End Sub

Private Sub Form_Load()

Dim blRet As Long

blRet = fCreateDib(Me)

blRet = fScrollInfoCurrentRecord(Me, True)

Me.TimerInterval = 250

End Sub

وأرفق لكم مثالناً لتطبيقي للكود . رجاء المساعدة ممن يجد حلاً لتبديل لون السجل الحالي مهما بلغ عدد السجلات .

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

أخوكم حسن :fff:

EX

تم تعديل بواسطه hkh007
قام بنشر

مشكور اخي الفاضل hkh007

سوف يتم البحث في الموضوع اكثر وموافاتك بالنتيجة

تحياتي sasg

قام بنشر

السلام عليكم

مثال مرفق قديم تم التعديل عليه تستطيع التحكم فيه بعدد السجلات المراد تظليلها ويمكنك تظليل السجل الحالي ويحتوي كذلك على فكرة عمل مسلسل للنماذج أو الإستعلامات .

هناك مشكلة عند تحويل النموذج إلى Data sheet واستخدام التنقل بين السجلات وخصوصا مع Page Dn و Page Up ولكن بما أن طلبك للنماذج المستمرة فلا مشكلة :( .

تحياتي .

CndFrmt.rar

قام بنشر

بسم الله الرحمن الرحيم

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

الأخ الفاضل أبو هادي :

المثال المرفق من قبلكم يتضمن نفس المشكلة التي ذكرتها ، وهي أنه يعمل على تلوين السجل الحالي لأول صفحة من السجلات المعروضة في النموذج ، ولا يعمل بعد ذلك ، أو بالأحرى يختلف ترتيب التحديد لديه ، فلا يلون السجل الحالي بلون مختلف وإنما يلون سجلاً قبل أو بعد السجل الحالي.

ومشكلتنا هي في اكتشاف الخلل الذي يحدث عند استعراض المزيد من السجلات ، والتغلب عليها بحث نتمكن من تحديد لون مختلف للسجل الحالي ومهما بلغ عدد السجلات .

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

أخوكم حسن :fff:

قام بنشر

بسم الله الرحمن الرحيم

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

أستاذنا الكريم أبو هادي :

الإجابة كافية و وافية .

ما شاء الله ، دقةٌ في التشخيص و كمالٌ في العلاج ..

أشكرك من أعماق قلبي ، وأسأل الله أن يجزيك عنا كل خير ويزيدك .

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

أخوكم حسن

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information