محمد طاهر عرفه

مرفق مثال لاحد الأخوة و أرجو ممن يعرف صاحبه أن يذكرنا باسمه mouseWheel.zip

المثال الاصلي الكامل هنا النسخ الاحتياطي / التصدير / تغيير المسار http://www.officena.net/ib/index.php?showtopic=301&hl= و بخصوص كلمة السر جرب التعامل معها بنفس المفهوم هنا http://www.officena.net/ib/index.php?showt...pic=1164&hl=pwd أقصد اضافة ";PWD=123" الي الكود ( لم أجرب ) حيث 123 هي كلمة السر

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

موضوع ذو صلة التعرف علي اللغة الحالية و تغييرها و التحكم فيها http://www.officena.net/ib/index.php?showtopic=953

السلام عليكم المشكلة علي ما فهمت ، أنه نتيجة العلاقة بين النموذج الرئيسيى و الفرعي لابد من العودة للنموذج الرئيسي و عمل refresh له و من ثم يظهر اضافة سجل فى النموذج الفرعي أي بعد ادخال اول سجل فى النموذج الفرعي ، عد الي السجل الرئيسي و قف فى حقل رقم الفاتورة مثلا ثم اضغط f9 لعمل refresh فسيظهر السجل الجديد فى النموذج الفرعي الذي سيسمح باضافة أكثر من سجل و لكن بعد كل سجل عليك بالعودة الي النموذج الرئيسي و عمل ال refresh و يمكن عمل تحايل علي ذلك بالكود لتنفيذ نفس المهمة و العودة الي السجل الجديد أو مثلا غلق و فتح النموذج الرئيسي بالكود سريعا بعد كل سجل عذرا للرد السريع ، و ساعيد دراسة المثال مساء باذن الله تعالي

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

مرفق مثال علي تكوين بيانات الجدول الجديد بناء علي عدد السجلات المطلوب الجدول موجود مسبقا باسم Table2 و يتم ملئ بياناته بناء علي بيانات النموذج بالطريقة التي وصفت و يمكنك الاعتماد علي الجدول table2 فى طباعة الملصقات التي تريد ، حيث أن عدد السجلات به هو العدد المطلوب MAKE_TABLE.rar

يمكنك مثلا اصدار النتيجو الكلية بصفر مثلا فى هذه الحالة و هذا يعتمد علي مفهوم الارقام لديك و ذلك بوضع الحقل المستنتج التالي فى الاستعلام aa: IIf([field2]=0;0;[field1]/[field2])

يمكن عمل ذلك بكود طويل و لكن هناك حل بسيط باستخدام الدوس اخرج الي محث الدوس اذهب الي المجلد الذي به الملفات و ليكن C:\pics و ذلك بالامر cd pics ثم اكتب Dir *.*>officena.txt و هذا يعني كتابة كل الاسماء فى ملف نص عد الي الويندوز و افتح الملف بالوورد مثلا و استخدم خاصية الاستبدال لحذف ما تريد من مسار او امتداد لتبقي الاسماء كما تريدها فقط ثم بعد ذلك استورد الملف الي الاكسيس مع تحياتي

ما شاء الله :d ملف جميل جدا (y) هدية جميلة

راجع أنواع بيانات الحقول فربما مثلا تدخل قيمة 40000 فى حقل Integer فلا يقبلها

ايه الحلاوة دي :d ماشاء الله ، مثال جميل جدا دائما متميز كما عودتنا (y)

بعد اذن أخي أبو هادي فقد شدني الموضوع هذا مثال مبني علي كود من موقع أجنبي للفيجوال بيزيك دوت نت المصدر http://vbnet.mvps.org/index.html?code/file...recursesave.htm و قد عدلت الكود ليتناسب مع الاكسيس فى المثال المرفق أرجو أن يكون هو المطلوب و المثال يقوم بالبحث عن كل الملفات التي لها الاسم المحدد فى الكومبو ثم يحصيها و يكتب عددها و يسجلها فى ملف نص باسم officena.txt فى المسار الافتراضي c:\mydocuments مثلا و البحث يتم فى كل الجهاز باستخدام عدة دوال يمكن تكوير التعامل معها كما تحب Search_all.rar

أعتقد أن ما تريده موجود بالتنيسقات الافتراضية أرجو مراجعة التنسيقات فى هذا الموضوع http://www.officena.net/ib/index.php?showtopic=277

ايضا ، راجع هذه المواضيع http://www.officena.net/ib/index.php?showtopic=383 http://www.officena.net/ib/index.php?showtopic=411

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

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

من الممكن تطبيق الدالة علي جدل بأكمله أو علي مجموعة من السجلات المختارة فى نموذج و ذلك باستخدام ال recordset فى حالة الجدول و ال RecordsetClone فى حالة النموذج و لكن اذا كان الغرض هو التعامل مع موضوع البحث فارجو مراجعة هذا الموضوع فربما يغني عن الاستبدال فكرة بحث ذكية (Search) الحروف ( ة ه ا إ آ أ ي ى ) http://www.officena.net/ib/index.php?showtopic=857&hl=

ضع فى التنسيق 0000

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

عند تحميل أي برنامج من برامج الفاكس مثل winfax Pro مثلا سينتج طابعة باسم البرنامج عند الطباعة اليها من الوورد سيتم ارسال الفاكس

علي الرغم من تنوع المواضيع الاتية بين تطبيقات الاوفيس المختلفة الا ان المفهوم واحد دروس في التعامل مع ال vba فى الإكسيل http://www.officena.net/ib/index.php?showt...opic=206&hl=vba المتغيرات في الاكسيل Variable http://www.officena.net/ib/index.php?showt...opic=116&hl=vba Access حديث حول المتغيرات فى VB http://www.officena.net/ib/index.php?showtopic=839&hl= اكتب بنفسك روتين فرعي أو وظيفة http://www.officena.net/ib/index.php?showtopic=425&hl=

فى بداية الماكرو ضع الكود التالي If Range("a1") <> 1 Or Range("a2") <> 2 Then MsgBox "not valid" Exit Sub End If

اذا كان المقصود اغلاق الاكسيل Application.Quit

السلام عليكم التنقل بين الشيتات http://www.officena.net/ib/index.php?showt...c=372&hl=التنقل للخروج نهائيا Application.ActiveWorkbook.Close و للحفظ قبلها Application.ActiveWorkbook.Save Application.ActiveWorkbook.Close