ابوخليل

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

حينما فصلت الـ 300 الاولى حسب مجموع الدرجات وحسب الرغبة الاولى ظهرت مجاميع الرغبة الاولى كالتالي : الرغبة الأولى العدد 10050001 191 10050002 85 10050003 16 10050005 5 10050006 3 فما هو الضابط في توزيع المجموعات الاخرى ؟

اخي الكريم اعتقد ان العملية ليست سهلة ولكن سنحاول فعليك بالصبر ....

اخي المهاجر الحق ان لك من اسمك نصيب كل عام وأنت بخير انظر الى الصدف والموضوع نفسه نلتقي فيه http://www.officena.net/ib/index.php?showtopic=37154

معذرة اخي سقطت سهوا هذه الدالة خاصة بالترقيم داخل الاستعلام اليك المثال مرة أخرى معدلا 211.rar

لديك مشكلة ولكني لا اعلمها لان المنسدلة تفتح عندي بعد الحماية واختار منها بدون مشاكل لان هناك خيارات للحماية وقد وضعت الخيار : تعبئة نموذج هل عرفت أو ادرجت طابعات حديثا الطابعات لها صلة بمشاكل التقارير في اكسس ولا اعلم ان كانت تسري على وورد اما ما سألت عنه فهناك في المستند المرفق سابقا حمايتين ( كلمة المرور للجميع رقم : 1 ) الاولى :من شريط الادوات / أدوات / حماية المستند تخرج لك قائمة على يسار المستند منها يتم حكاية المستند حسب خياراتك الثانية : حماية الكود البرمجي من محرر الفيجوال ومن الشريط العلوي اختر Normalproprtes / tools ثم لسان التبويب prodciton

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

انظر ان كانت هذه الحماية تناسبك Doc5_pass.rar

المستند سليم والكود شغال % قد يفيدنا بعض الاخوة ايضا ممن جرب المستند لا أعلم ما المشكلة لديك

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

المرفق 2007 اتمنى ان تجد حلا سريعا

استبدل الكود بهذا وسيعمل إن شاء الله Private Sub ComboBox1_DropButtonClick() If ComboBox1.ListCount = 0 Then With ComboBox1 .AddItem "محمد" .AddItem "أحمد" .AddItem "علي" .AddItem "العمدة" End With End If End Sub المشكلة في نوع الحدث

إخواني : أبو الحارث وأبو عبير جزاكم الله أفضل مما دعوتم به .. وكل عام وأنتم بخير

نعم تختار التنسيق كما تريد في حقل الاستبدال وتترك حقل الاستبدال بــ فارغا عندما تكون المشيرة داخل حقل الاستبدال : تنسيق / خط / ثم اختر اللون لزيادة الايضاح انظر الى الصورة

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

في 2003 مثل الصورة في هذه المشاركة لازالة ايقونة الحفظ http://www.officena.net/ib/index.php?showtopic=37786&view=findpost&p=203896 في 2007 وأعلى ليس هناك فرقا يذكر الا في طريقة الوصول

انظر الصورة انتبه : ان اجريت الحذف على القالب العمومي Normal لن تجدها في جميع مستنداتك

حل مشكلتك في تخصيص اشرطة الادوات تستطيع ازالة واضافة ما تريد

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

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

لجعل هذه الخاصية لجميع مستندات وورد القديمة والجديدة : فقط انقل الكود من الوحدة النمطية الخاصة بالمستند والتي هي موجودة فيه الآن انقلها الى الوحدة النمطية للقالب Normal

جزاك الله خيرا يا أبا الحارث اللهم كما أحسنت خلقي فأحسن خلقي

ما تريده ممكن فقط اذكر لي ما حاجتك وما الهدف من ذلك لانه عند تطبيقها برنامج الوورد لن يحفظ حرفا واحدا .

شغال عندي على 2010 و 2007 و 2003 وهذا هو المثال بالمرفق أدناه كل ماعليك عمله هو تخفيض امان الماكرو الى ادنى مستوى لأنه اذا كان امان الماكرو مرتفع يحجب وورد الاكواد عن العمل s.rar

تفضل ضع هذا الكود في حدث الاغلاق للمستند ActiveDocument.SaveAs FileName:="s.doc", FileFormat:= _ wdFormatDocument, LockComments:=False, Password:="", AddToRecentFiles:= _ True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:= _ False, SaveNativePictureFormat:=False, SaveFormsData:=False, _ SaveAsAOCELetter:=False ActiveWindow.Close Application.Quit استبدل s.doc باسم المستند لديك