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

Moosak

أوفيسنا
  • Posts

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

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

  • Days Won

    55

كل منشورات العضو Moosak

  1. السلام عليكم ورحمة الله وبركاته .. كل الشكر والتقدير لك أستاذ @ابو جودي على هذي التحفة الفنية 🙂 أنا جمعت البتاع كله في ملفات لتسهيل التطبيق على الاخوة 🙂 وبعد التجربة لم يتم إنشاء الملف المضغوط وظهرت لي هذه الرسالة من WinRAR : وبعدها : ولكن لا يتم إنشاء الملف !! 🙂 طبعا هذا يحصل في الدوال الثلاث الأولى : وهذه : وهذه : وهذا: وهذا : وهذا : وغيرها ..... 😅🖐🏻 الخلاصة : أنت راجع كل الدوال كلها .. وهناك كم دالة هم اللي أشتغلوا فقط والباقي لا . Automate compression and decompression processes for files and folders.zip
  2. إجعل النموذج في وضع ( نموذج مستمر ) .. وأول ما تختار الوردية بيظهر لك السجل الجديد .. وبعدها تختار الوردية التالية 🙂 : ولضمان عدم إضافة أكثر من 3 ورديات أكتب الكود التالي في حدث عند الحالي للنموذج : والنتيجة 🙂 : قاعدة البيانات2.accdb
  3. أضف هذا السطر قبل كود تعيين الحالة هكذا : If IsNull(Me.نهاية_التاريخ) Then Exit Sub
  4. وعليكم السلام ورحمة الله وبركاته 🙂 وكل عام وأنتم بصحة وعافية .. تفضل الحل .. ra1.accdb
  5. بدون الحاجة لأي تدخل برمجي أعتقد أنه بإمكانك إعادة تنسيق وتظبيط تنسيق التقرير وتضغير الحقول والخطوط لتلائم حجم ال A4 مباشرة 🙂 وهذه تجربتي : base_A.accdb
  6. النموذج جيد ، ولكنه يشترط تكبير النموذج Maximize بحجم الشاشة لكي يعمل .. وأنا بحثت في مكتبتي فوجدت مثال قديم يقوم بتحجيم جميع العناصر حتى عند تغيير حجم النموذج 🙂 وطبعا للأسف لم أخزن اسم صاحب المثال .. ولكن هاكموه كما وجدته : ملاءمة عناصر النموذج حسب حجم النموذج ☺.mdb
  7. شكرا جزيلا أستاذ @kkhalifa1960 مجهود رائع 🙂
  8. جوابا على السؤال قلت سابقا : الكود يقوم بتغيير الرقم الذي في حقل الحالة .. لذلك وبسبب الفرز الذي عملناه سابقا على النماذج سيعود الكتاب تلقائيا للجهة الصادرة منه بعد أن تنتهي منه الجهة الوارد إليها .. 🙂
  9. أخي عبداللطيف النسخ الاحتياطي قائم على فكرة نسخ > لصق القاعدة 🙂
  10. أهم شي بالموضوع أن يكون لديك مخطط كامل بخط سير المعاملات .. بعدما تجهز المخطط أمامك تضع جميع السيناريوهات المحتملة في المخطط .. ثم إبدأ بكتابة الأكواد حسب خط سير العمل على أزرار في النموذج وتتغير التسمية التوضيحية لها حسب القيمة الموجودة في حقل status بهذا الشكل : الحالة = 1 >> التسمية على الزر : تحويل للقسم أ الحالة = 2 >> التسمية على الزر : تحويل للقسم ب الحالة = 3 >> التسمية على الزر : تحويل للقسم ج الحالة = 4 >> التسمية على الزر : تحويل للقسم د ولعلك تضع زر >> إعادة للقسم ب والكود الذي يوضع على الزر يقوم بتغيير الرقم الذي في حقل الحالة للرقم التالي . 🙂
  11. أنا عندي الإصدار 365 - 64 بت
  12. السلام عليكم أستاذ @gavan 🙂 الفكرة التي أعمل بها في نفس السياق هي إضافة حقل عبارة عن قائمة منسدلة في جدول Reg_Book_Tbl مثلا .. وأسمي الحقل Status .. وهذه القائمة المنسدلة بها جميع المراحل التي يمر لها الكتاب مثال : 0 - تسجيل جديد 1 - قسم الوثائق 2 - قسم المعالجة 3 - معاد للتعديل 4 - جار المراجعة 5 -ناقصة . . 9 - مكتملة 10 - الأرشيف ثم أعمل كود بسيط يغير أو يقرأ الرقم الموجود في القائمة المنسدلة (على فكرة القائمة تكون من عمودين الرقم [مخفي] والحالة) لمعرفة حالة المعاملة وأين وصلت .. ولفرز السجلات الخاصة بكل قسم حسب الحالة .. نقوم بفلترة مصدر بيانات النموذج ليأخذ كل قسم ما يخصه . 🙂 يارب يكون الشرح واضح 😅✌
  13. المعذرة من الجميع .. طبعا أنا طريقتي في النسخ الاحتياطي مختلفة تماما .. 😅🖐 وكل ما فعلته هو تأكدت أن كود صاحب الموضوع يعمل .. 😁👌 والعم فادي @Foksh ما يقصر معاكم 😄🌹
  14. وعليكم السلام ورحمة الله وبركاته 🙂 هذا ما يحدث 🙂👇 (1) (2) (3) (4)
  15. بعد التجربة .. فعلا عند فتح التقرير في وضع (معاينة قبل الطباعة) لا تظهر الصورة .. 🤷‍♂️ ولكنها تظهر في وضع (معاينة التقرير) فقط .. ولا تظهر عند التصدير لل PDF كذلك .. وهذا بسبب أن الأكسس لا يتعرف على الأجزاء الشفافة لصور ال PNG عند معاينة الطباعة ..
  16. تفضل 🙂 : ( وأرفقت لك المربع الشفاف بشكل منفصل أيضا) 🙂 Transpharnt Picture.zip هات ما عندك 😎✌
  17. أهم شي تكون الخطوات بسيطة .. 👍😁 والباقي توكل على الله 😊🖐️🌹
  18. وعليكم السلام ورحمة الله وبركاته 🙂 أعمل مربع أو مستطيل في برنامج الباوربوينت ، وغير الشفافية إلى الرقم الذي يناسبك .. ولا تنسى تغير الخلفية للون الأبيض .. بعد كذا تحفظ المستطيل كصورة بصيغة PNG وتفتحها في الأكسس وتخليها فوق صورة الموظف .. وبكذا بيكون درجة وضوح صورة الموظف خفيفة ..
  19. مستر فوكش @Foksh… مجتهد ومثابر ومبدع ومبتكر .. ما شاء الله عليك 😌🌷🌹 خلي تقييمك السنوي علي هذي المرة 😁👌 هذي فعلا بدها مقلوبة يا زلمة 😋✌️🍲 الله يوفقك ويبارك فيك وأهلك ومالك وعلمك يازلمة 😊🤲
  20. وعليكم السلام ورحمة الله وبركاته 🙂 تفضل هذه أحد الطرق الممكنة : 2 Events.accdb
  21. إذا قصدك تكون النتيجة هكذا : فتكتب هذي الصيغة في مصدر بيانات حقل التنسيق : =Mid([Text1];InStr(1;[Text1];".")+1) & " %" 🙂
  22. شكله فيه كلام مكتوب بالحبر السري في المشاركة الأولى وشفرة ما نشوفها جعلت أستاذنا @ابوخليل يضحك (أضحك الله سنكما) 😅 أنا في بالي حلين : الأول : أنك تجعل النموذج الفرعي غير ممكن لحدا ما يكون النموذج الرئيسي فيه بيانات .. وممكن تضيف هذا الكود للنموذج الرئيسي في حدثين لتحقيق ذلك ( في الحالي + بعد التحديث ) Private Sub Form_Current() Me.subformControlName.Locked = (Me.NewRecord) End Sub Private Sub Form_AfterUpdate() Me.subformControlName.Locked = (Me.NewRecord) End Sub والثاني : أنك تضيف حقل تاريخ للنموذج الرئيسي (وممكن تخليه مخفي - ليخدم هذي القضية فقط ) وتعمل أمر يعبي هذا الحقل بتاريخ اليوم قبل لا ينتقل للنموذج الفرعي 🙂
  23. كود راااااااائع جدا حبيبنا @ابو جودي ويسهل العمل 🙂 لا يقل جودة عن روائعك اللي عودتنا عليها .... 😊💪
×
×
  • اضف...

Important Information