عبدالله المجرب

السلام عليكم جرب هذا الكود ضعه في محرر أإكواد الفورم Private Sub Item_GotFocus() strSQL = "SELECT TblItems1.IDItem, TblItems1.Item, TblItems1.IDcat " & vbCrLf & _ "FROM TblItems1 " & vbCrLf & _ "WHERE (((TblItems1.IDcat)=[Forms]![frmExpenses]![Category])) " & vbCrLf & _ "ORDER BY TblItems1.Item;" Me.Item.RowSource = strSQL End Sub

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

يُنقل الى قسم الأكسل =========================== جرب أن تستعمل دمج المرسلات

والله يا استاذنا الكريم أبا خليل لن نوفيكم حقكم من الشكر والعرفان فيما تقدمونه انا لم يكن لي علاقة بالاكسس في بداية مشاركاتي في المنتدى لكن علاقتي بالاستاذين ابو أدم وابو خليل من بداية دخولي منتدى أوفيسنا كانت علاقة محبة في الله ونظراً لدماثة اخلاقهما. أرى أن لا نغيير طابع منتدانا لان هناك من يرى نفسه أعلى منا ويمن علينا بما لديه من العلم (اذكره بقول الشاعر " قل لمن يدعي في العلم منزلــــــــــــة **** حفظت شيئا وغابت عنك أشيــــــــــــاء") فنحن تعودنا بأن من لديه حل أخر لا يستأذن قبل أن يضع مشاركته بل هو إثراء للموضوع وزيادة معرفة فلم التغيير هذا رايي والله أعلم تروني أكتب وفي القلب غصه مما قرأت من ردود رمهان فعذروني

اعتقد أن الموضوع مر علي في الفريق العربي في مشاركة للاستاذة زهرة لكن للأسف المنتدى لم يعد يعمل

اظن النقاط الثلاث الأولى تتم قبل بناء الملف بالتعامل مع خصائص الماسح هل ممكن تدلني أستاذ ابو ياسر على طريقة ضبط خصائص الماس علماً بأن الماسح الذي لدي تجد معلومات عنه في المشاركة الأولى هنا http://www.officena.net/ib/index.php?showtopic=59268&hl=

جزاك الله خيراً أستاذ جعفر

لا ليست الفاصلة بل عدلت كلمة الدرجة لتصبح الدرجـة لاحظ بين الجيم والتاء المربوطة

شكراً جزيلاً تمت التجربة بنجاح

السلام عليكم احتاج الى مستند وورد للعمل كقالب للادخال فقط ولا اريد أن يتم حفظ البيانات فيه أي يتم الخروج منه بدون حفظ وبدون رسالة هل تريد حفظ التغييرات جربت أن استخدم هذا الكود Private Sub Document_Close() SendKeys "{Tab}" SendKeys "{Enter}" End Sub لكن عيبه أنه يقوم بأغلاق NumLock في كل مرة يتم إغلاق الملف جربت أن اجعل الملف للقراءة فقط ولكن مشكلته مع أوفيس 2013 أنه يتم فتحه في وضع الأمان هل من حل وعن طريق الأكواد وشكراً

ضع رابط للموضوع الذي حملت منه المرفق

هل ممكن وضع برنامج متكامل وبه عدد من المستخدمين

أتقدم بالاصالة عن نفسي ونيابة عن كافة أعضاء الموقع بالتهنئة للأخ عبدالله قدور واللاخ مارد بمناسبة ترقيتهما الى عضو مميز نظير عطائهم المستمر في المنتدى ومنها للاعلى وشكراً

السلام عليكم اخي الكريم السبب في عدم ظهور القائمة اثناء الضغط على يمين الماوس وهو ان نوعي الزر محتلفين شاهد الصورة فالزر طباعه كل الشهادات من النوع رقم 1 والزر اظهار الناجحين من النوع رقم 2 ولإظهار القائنة في الزر رقم 2 اضغط على الخيار Design Mode (وضع التصميم) المرقم بـ 3 في الصورة وستظهر القائمة

دالة في منتهى الروعة بارك الله فيك استاذ ياسر

اخي الفاضل نصيحة تستعمل خاصية البحث قبل وضع أي سؤال فبهذه الطريقة ستتعلم بعد التجربة ====== اليك هذه الروابط http://www.officena.net/ib/index.php?showtopic=36497 وهذا http://www.officena.net/ib/?showtopic=41126 وهناك الكثير فقط إبحث وستجد فإذا تعبت ولم تصل الى نتيجة إسأل ارجو أن تتقبل النصيحة وارجو أكثر أن تستفيد منها وشكراً

السلام عليكم جرب الأتي إستبدل المعادلة التي في نص 2 في التقرير بهذه =ArbNum2Text(Val([Total]);2;3;"درجـة";"درجات";1;"جزء";"أجزاء";1)

السلام عليكم بداية عمل موفق (لانه بدون الإستعانة بتقرير) نتمنى أن يتم التالي لكي يتكون الملف بالصورة المنشودة من الجميع 1. سحب أكثر من ورقة 2. التنبيه في حال كان الماسح مغلق 3. التنبيه إذا لم تكن هناك أوراق في ملقم الورق الخاص بالماسح 4. أن يكون مكان الحفظ إختياري وشكراً

نيابة عن إدارة المنتدى أتقدم بالتهنئة الى الأخ العزيز أبو باسر لترقيته الى عضو خبير ومنها للأعلى بإذن الله

أسأل _الله_ في عليائه أن يشفيك ويعافيك معافاه تامة وحياك الله بيننا

فتح الملف لدي به ثلاث خلايا code 4 79-4 1979-4 اين المشكلة وما المطلوب؟؟؟

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

تقصد ان هناك ارقام اخرى غير الواحد ام انك لا تريد هذا العمود

أستاذنا واخينا م/ محمد صالح السلام عليكم ورحمة الله وبركاته بارك الله فيك علي شرحك السلس واسلوبك البسيط واللهم يجعله في ميزان حسناتك ويبارك لك في علمك وعملك واولادك مع تحياتي

تم التعديل وضح أكثر البرنامج الجامع2.zip