Moosak

هذه هي المشكلة الأزلية مع الأكسس .. 🤦‍♂️ أنا هصف جنبك لحد ما حد يحل هذي المعضلة 😅

في حالتي ضغطت على زر اللعب فدخل مباشرة باسم أوفيسنا ولم يضفني .. 😅🖐

تسلم أيدك يا فنان 🙂 فقط لاحظت أنني عندما أدخل أسمي كمستخدم جديد لا ينحفظ إلا إذا خرجت وفتحت النموذج من جديد 🙂

نعم ممكن بنفس الفكرة .. 1-حقل لحفظ القيمة في الجدول 2- تضيفين الحقل في النموذج 3- تضيفين Tag جديد للأعمدة 4ـ تعديل الكود لتغيير عرض الأعمدة ذات نفس التاج حسب القيمة المخزنة في الجدول..

لو لاحظتي أن ربطت جميع العناصر بشبكة جدولية واحدة علشان أستطيع أتحكم بمواقع العناصر وتتفاعل مع بعضها .. ويكفي أني أغير أرتفاع عنصر واحد في كل سطر ( صف ) وهيتغير أرتفاع الكل ( نفس الجداول في الأكسل أو الوورد بالضبط ) لذلك هتلاقي في أماكن فارغة في الجدول علشان التنسيق .. ودي على فكرة مساحات فارغة وليست مربعات نص ..

تفضلي : التحكم بالمسافة بين السطور في التقرير.accdb

ما شاء الله تبارك الله مهندسنا مستر @Foksh 😄👏 نقلة نوعية ماشاء الله .. إشي فنتاستك 🤩👌 هذي فعلا بدها منسف يا زلمة 😋🍲 الجرافكس مع التصميم والبرمجة عامل مزيج إبداعي متميز .. تستاهل خمس نجوم ⭐⭐⭐⭐⭐.. الله يوفقك ويبارك فيك 😊🤲

شرح الكود من العم أبو ذكاء 😁🖐: هذا الكود هو جزء من تطبيق يستخدم لغة VBA (Visual Basic for Applications) لإنشاء شريحة جديدة في برنامج PowerPoint والتقاط صورة منها. إليك شرحًا لوظيفة كل جزء من الكود: ### وظيفة الكود: 1. **إعداد المتغيرات**: - يتم تعريف مجموعة من المتغيرات (مثل `PptApp`, `PptDoc`, `Diapo`, `Sh`, `Sh1`) للتعامل مع كائنات PowerPoint. 2. **إنشاء تطبيق PowerPoint جديد**: - يتم إنشاء مثيل جديد من PowerPoint وفتح عرض تقديمي جديد. 3. **إضافة شريحة جديدة**: - يتم إضافة شريحة جديدة إلى العرض التقديمي وتعيين تخطيطها إلى فارغ (`ppLayoutBlank`). 4. **إضافة شكل مستطيل**: - يتم إضافة شكل مستطيل إلى الشريحة ليكون خلفية بيضاء. 5. **إضافة نص**: - يتم إضافة تسميات نصية إلى الشريحة، مع تحديد النص ولون الخط وحجمه. النص يتم الحصول عليه من خاصية `Me.note`، وإذا كان فارغًا يتم استخدام القيمة الافتراضية "kanory". 6. **توسيع الشكل ليناسب النص**: - يتم ضبط حجم الشكل تلقائيًا ليناسب النص المضاف. 7. **توسيع الشكل في وسط الشريحة**: - يتم تحديد موقع الشكل ليكون في وسط الشريحة. 8. **حفظ الشريحة كصورة**: - يتم حفظ الشريحة كصورة بتنسيق JPG في مجلد معين. 9. **إغلاق PowerPoint**: - بعد حفظ الصورة، يتم إغلاق العرض التقديمي وتطبيق PowerPoint. 10. **نسخ الصورة**: - يتم التحقق مما إذا كانت الصورة قد تم حفظها بنجاح. إذا كان هناك ملف صورة، يتم نسخه إلى موقع آخر مع اسم محدد. بعد ذلك، يتم حذف النسخة الأصلية. ### ملخص: الكود يقوم بإنشاء شريحة في PowerPoint، يضيف إليها نصًا وشكلًا، ثم يقوم بحفظ الشريحة كصورة JPG في مجلد محدد. في النهاية، ينسخ الصورة إلى اسم جديد (إذا لزم الأمر) ويحذف النسخة الأصلية.

لسه فيه مفاجآت ما خطرتش على بالك 😅🖐

وعليكم السلام ورحمة الله وبركاته 🙂 أنشيء هذا الاستعلام : وهذا الناتج : وبعدها صمم تقرير مبني على هذا الاستعلام .. 🙂 احصاء بالعدد والمبلغ.rar

وعليكم السلام ورحمة الله وبركاته .. 🙂 أخي مازن نافذة الأكواد مغلقة بكلمة مرور ..

أستاذة صفاء .. خلي أول حاجة تيجي في بالك لما تنزلي أي موضوع أنك تحطي مرفق مع السؤال .. مش هنشتغل في الهوا بأة 😏

ماشاء الله تبارك الله .. لك بصمة في كل مجال 🙂

بالإضافة لطريقة المهندس @محمد احمد لطفى جرب هذه الطريقة أيضا 🙂 : If IsDate(Me.datex) Then Me.datex2 = Year(CDate(Me.datex)) End If test8102024.rar

وعليكم السلام ورحمة الله .. تفضل 🙂 New Microsoft Access Database (4).rar