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

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

قام بنشر

السلام عليكم

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

  If DLookup("[check]", "tblreport", "[id]=1") = 1 Then
  Me.Printer.Orientation = acPRORLandscape

  ElseIf DLookup("[check]", "tblreport", "[id]=1") = 2 Then
  Me.Printer.Orientation = acPRORPortrait
  
 End If

فهل يمكن تعديل الكود ليتم ذلك فخاصية الارتساء غير موجودة في التقارير

 

قام بنشر
17 دقائق مضت, محمد ايمن said:

لماذا لا تصمم تقريرين الاول عمودي و الثاني افقي و بناء عليه يتم الاختيا

فكرة لا بأس بها اخي محمد ايمن  لكن اذا كان البرنامج يحتاج الى 20 تقرير تقريبا فيجب علي انشاء 40 تقرير

 

قام بنشر

السلام عليكم 

خطرت لى تلك الفكرة

أن نصنع جدولا به عمود لاسم التقرير وآخر لاسم عنصر التحكم وعمودين آخرين لخصائص عنصر التحكم فى حالة كان التقرير عرض أو طول 

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

آسف ليس لدى وقتا كافيا للتنفيذ الفكرة الا أنى أرجو أن يكون الأمر واضح 

 

  • Like 1
قام بنشر

السلام عليكم

اهتديت الى هذا الحل ولكني لم اقتنع به بشكل كامل بحيث اقوم بضرب عرض عنصر التحكم ب 1.44

  Me.ta1.width = Me.ta1.width * 1.44
  Me.address.width = Me.address.width * 1.44
Me.pagenumber.width = Me.pagenumber.width * 1.44

 

قام بنشر
في 11/5/2016 at 05:23, عبد الله قدور said:

السلام عليكم

اهتديت الى هذا الحل ولكني لم اقتنع به بشكل كامل بحيث اقوم بضرب عرض عنصر التحكم ب 1.44


  Me.ta1.width = Me.ta1.width * 1.44
  Me.address.width = Me.address.width * 1.44
Me.pagenumber.width = Me.pagenumber.width * 1.44

 

طب شوف المثال ده يمكن يعجبك فى شئ 

Full Control Of Print Report.rar

قام بنشر
9 ساعات مضت, ابا جودى said:

طب شوف المثال ده يمكن يعجبك فى شئ 

فيه معلومات جيدة لكن انا اريد لما أحول التقرير الى افقي يتم تمدد عناصر التقرير نحو الاتجاه الفارغ من التقرير فما حاجتي لتحويله الى افقي وتبقى المعلومات عمودية 

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