اذهب الي المحتوي
أوفيسنا

biskra

عضوية شرفية
  • Posts

    274
  • تاريخ الانضمام

  • تاريخ اخر زياره

السمعه بالموقع

111 Excellent

عن العضو biskra

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    ùhgf
  • البلد
    الجزائر

اخر الزوار

1,182 زياره للملف الشخصي
  1. جرب الكود التالي فقط عدل في مسار ملف الحفظ لأنه لا يمكنك فتح التقرير بامتداد pdf دون ان تتم عملية التصدير الى صيغة pdf أولا و إذا نجحت معك عدل على الكود بالنسبة لبقية السؤال DoCmd.OpenReport "t1", acViewPreview DoCmd.OutputTo acOutputReport, "t1", acFormatPDF, "مسار ملف الحفظ", True
  2. بعد فتح التقرير في وضعية التصميم هذه الخطوات المتتالية للوصول للأداة، أرجو أن لا تواجهك مشطلة اللغة، جرب و أخبرنا
  3. محاولة عن طريق أداة أداة ocx المرفقة و التي يجب تسجيلها الشرح الموجود أسفله مرفق معها مثال للمطلوب و ما عليك إلا تصميم الحقول و تنسيقها مع الجدول، و يمكنك التعديل على حجم الخلايا حسب رغبتك و ذلك بوضع التقرير في وضع التصميم ثم خصائص كما هو موضح في الصور المرفقة: 1 أضغط على ... 2 درجة ميلان النص مثلا 270 درجة تعطي النص عمودي و 0 درجة يعطي النص عادي 3 اسم الخلية شرح استعمال الأداة منقول افتح المجلد المضغوط واستخرج RotateLabelVer2.ocx إلى مجلد مكتبة المكتب ذات الصلة مثل 😄 \ Program Files \ Microsoft Office \ OFFICE11. الآن افتح التقرير في طريقة عرض التصميم. اذهب إلى أدوات >> ActiveX Controls وانقر على زر التسجيل. تظهر نافذة حوار ملف Windows قياسية. استعرض للوصول إلى أي مجلد قمت بتنزيله ملف RotateLabel.ocx على سبيل المثال 😄 \ Program Files \ Microsoft Office \ OFFICE11. حدد الملف ثم انقر فوق الزر فتح. أغلق مربع قائمة عناصر تحكم ActiveX. انتقل الآن إلى مربع الأدوات العادي وانقر على زر المزيد من عناصر التحكم. ابحث عن RotateLabel وانقر فوقه ، ثم ضعه في تقريرك. قم بتعيين مصدر التحكم ثم العب باستخدام إعدادات HAlignment و VAlignment و Escapement ضمن علامة التبويب أخرى في مربع خصائص عناصر التحكم. RotateLabelocx.rar Database12.rar
  4. معذرة الأخ سامي عن الخلط في الإسم، و الفضل يعود لك في الحل،
  5. تعديل بسيط في التنسيق على الحل المقدم من الأخ TQTHAMI قاعدة.rar
  6. تم التعديل على الكود لتجاهل الخطأ On Error Resume Next Database1.rar
  7. أمسح هذا السطر من الكود و سوف يشتغل عادي Sleep 2000 مثال مرفق للكود يشتغل عادي جرب بالضغط على زر H جرب ثانية بالضغط على H من لوحة المفاتيح سوف يشتغل كذلك chrome.rar
  8. تم تجربة الكود باسم الجدول و الحقل كما ورد في السؤال و فعلا لم يشتغل قمت بتغيير اسم الجدول فاشتغل عادي يظهر أن اسم الجدول ربما من الأسماء المحجوزة fff2.rar
  9. جربت الكود يشتغل عادي من خلال زر على النموذج fff2.accdb
  10. Dim objAdb As Object Set objAdb = CreateObject("Access.Application") objAdb.OpenCurrentDatabase ("F:\Revision.mdb") objAdb.DoCmd.OpenReport "revision", acPreview جرب الكود
  11. جرب الكود التالي Dim objAdb As Object Set objAdb = CreateObject("Access.Application") objAdb.OpenCurrentDatabase ("C:\Users\simba\Desktop\اسم و مسار قاعدة البيانات.mdb") objAdb.DoCmd.OpenForm "اسم النموذج أو التقرير"
  12. هل يمكن وضع الكود الذي تستعمله كس نحاول المساعدة
  13. DoCmd.SetWarnings False ثم تضيف الكود التالي لكي تشتغل التنبيهات في حالة وجود أخطاء أخرى DoCmd.SetWarnings True
×
×
  • اضف...

Important Information