نجوم المشاركات

مش معقووووووووووول اخينا وحبيبنا ابو حنين متواجد هنا لقد اتي العيد قبل العيد

بعد اذن اخي ابو عيد جرب المرفق Balance leaves. 2016.rar

تفضل ... نضع الكود التالي في حدث عند الدخول للنموذج الفرعي ... و تكرره لكل الحقول الواجب ادخالها ... If IsNull([Forms]![الفاتوره]![المحل]) Then MsgBox "يرجى ادخال اسم المحل", vbInformation + vbOKOnly, "خطأ" Me.المحل.SetFocus End If end invoice2.rar

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

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

بسم الله الرحمن الرحيم السلام وعليكم ورحمة الله وبركاتة ومازلنانتواصل معكم فى شرح سلسلة تعليم vba للمبتدئين ونقدم لكم الجزء الخامس https://www.youtube.com/watch?v=0mDB-jZXXYE

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

رائع

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

هدف جميل أخى - ولكن اعذرنى فانا أحدثك الآن بلغة الآلة والتي بحاجة الى هدف منطقى واضح كاستخراج تقارير واستخلاص نتائج. وعلى كل لنكمل سويا التفكير بصوت عال أيضا - حتى يسمعنا الأحبة أعضاء المنتدى فيظنوا أننا نتشاجر فيأتوا ليفضوا الشجار - بعد أن اتفقنا على مكونات الداتا الأساسية : 1- سأقترح اطار معين لنسير عليه داخل العمل : أ- ليكن برنامجنا المنشود هو عبارة عن مدونة (مفكرة) لطلاب العلم : لجمع الفوائد والنكات العلمية والبحث عنها واسترجاعها بأى وقت اتفقنا أم لك اقتراح آخر. ب- وعلى هذا يكون عملنا على البرنامج سيكون قاصر على وظيفتين اثنين فقط جمع وحفظ الفوائد - ثانيا البحث عن الفوائد واسترجاعها هل كلامى حتى الآن يسر على ما يرام - ولا ابتديت اعك (بالمصرى العك اللخبطة وبالصعيدى الخربطة ) - اتفقنا على الصوت العالى, أمم

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

أعانك الله على ما أنت فيه جميل جدا موضوعك وحق للمحتسبين الأجر المساهمة فيه فما أظنه الا عملا يبتغى به وجه الله ولكن أعتقد أن هذا البرنامج للاستخدام الشخصى فقط - فهو بمثابة دفتر تقيد به الفوائد التي تمر بك أثناء البحث والدرس - فهل هذا صحيح ؟ أبشر فكل من هاهنا ما أحسبهم والله حسيبهم الا أهل تطوع لعمل الخير - سأبذل ما بوسعى ان شاء الله وأدعو أساتذة المنتدى الكرام بمد يد العون ولو بالشىء اليسير مساهمة بهذا العمل الخيرى... اسمحلى الآن بالتفكير معك بصوت عال 1- مكونات الداتا التي تريد الاحتفاظ بها داخل برنامجك تتمثل في الكائنات الآتية: أ- الموضوع (الموضوعات التي تتعلق بها الفوائد) : كالعقيدة - اللغة - الفقه .... ب- الأبواب ( الموضوعات الفرعية التي ستندرج تحتها الفوائد) : مثلا : في الموضوعات العقيدة ,مثلا: باب الأسماء والصفات.... ج - الفوائد (الفوائد التي سيتم تخزينا تحت هذه الموضوعات والأبواب)... هل هذا التصور صحيح حتى الآن أم لا؟! 2- هذا فيما يتعلق بمدخلات البرنامج , والآن ماذا عن المخرجات (طبعا المخرجات هي الهدف المنشود والغاية المقصودة من تصميم البرنامج) فعلاما سنحصل بعد تدوين هذه الفوائد - هل سنستخرج مثلا كتابا به مجموعة الفوائد مرتبة وفقا للأبواب مثلا أرجو التوضيح.. 3- وفى النهاية , قرب أذنك حتى لا يسمع أحد؛ لماذا تركت طلب العلم واتجهت للبرمجة , انت حابب تشتغل شغلة البطالين (آسف أيها المبرمجون أن بقصد نفسى طبعا)

تفضل الكود المشغل Dim FilePath As String FilePath = Application.CurrentProject.Path & "\myv.wmv" WindowsMediaPlayer6.URL = FilePath WindowsMediaPlayer6 هذا اسم عنصر التحكم الذي ستقوم بإضافته الى النموذج من مربع الادوات من زر : عناصر تحكم اضافية myv.wmv هو اسم ملف الفيديو يكون بجانب قاعدة البيانات

جزاك الله خيراً أخي الحبيب عبد العزيز ...على ما قدمت وبينت ...بارك الله بكم وجعل مثوانا ومثواكم جنة عرضها السموات والأرض أعدت للمتقين ....آمين..آمين ...والصلاة والسلام على سيد المرسلين والحمد لله رب العالمين.

DoCmd.OpenReport "report name", acViewPreview DoCmd.RunCommand acCmdExportRTF

و ماذا تقول عن الخلايا B3 &B4 &I3 &I4 , و الخ..... تم معالجة الامر Data salim.rar

أخي وحبيبي ياسر خليل بارك الله فيك وجزاك الله كل خير أنت أستاذي علمتني الكثير البرنامج حالياً يعمل على كافة الانظمة وخاصة ويندوز 8 يعمل بشكل يفوق الخيال وبدون اي مشاكل وان شاء الله سوف أقوم بحل مشكلة التوقف في القريب تقبل تحياتي ومروري

اضغط على Search باليمين ثم اختر تعيين ماكرو واتبع الخطوة الثانية كما في الصورة 1 و 2 المرفقتين 1.rar

و عليكم السلام و رحمة الله و بركاته ...

انظر للملف بشكله نهائي كما قلت سابقا ليس بحل مثالي و لكنه يوصلك للنتائج المرجوة في انتظار حلول امثل من الاعضاء النتيجة ستكون مثلا في طالبين على شكل 3/1((1 3/1((2 و تعني 3 : ان الطالبان ترتيبهما حسب معدلهما هو الثالث 1 : ان الطالب حسب سنه هو الاول و اذاكان متساويان في السن سنجد 1 و 1 و بالتالي نذهب لقراءة الرقم وراء القوس و هو الذي يعبر عن الترتيب الابجدي... اتمنى انني وفقت في المساعدة بالتوفيق الملف النهائي.rar

لقد حسنته حسب السن ( ربما ليس هو بحل مثالي لكنه يفي بالغرض ليبقى مشكل التهجئة ... حسب سن.rar

حسب ما فهمت من الموضوع 1- نقوم بترتيب الطلبة وفقا لمعدلهم و بالطبع من الاكبر الى الاصغر 2- في حالة تساوي معدلات الطلاب نقوم بالتفريق بينهم على اساس السن و الاولية للاصغر سنا 3- في حالة تساوي السن تكون المفاضلة حسب الترتيب الابجدي للاسماء.......... ..... المعادلة التي طرحتها تقوم بترتيب الطلبة وفقا لمعدلاتهم ... و لكن لا تحقق النقطة 2 و 3 .... لذا يجب تحسين المعادلة New WinRAR archive.rar

جرب هذه المعادلة هي تقوم بابراز الترتيب مثلا 1 2 2 3 4 4 ..... الخ .... و بالتالي سيكون الاشكال المتبقي من هو مثلا الثاني الاول و الثاني الثاني ...حسب شرطي السن اولا و من ثم التهجئة ..... =SUMPRODUCT((B$2:B$19>B2)/COUNTIF(B$2:B$19,B$2:B$19&""))+1

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

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

هل تعلمون ما معنى جزاك الله خيراً ؟؟؟ معاني جميلهً لكلمهً جزاك الله خيراً أغلب الناس حين تقدم لهم معروف يقولون : جزاك الله خيراً وأود أن أضيف إلى حضراتكم معلومة بمعنى هذه الكلمة كلمة خير تدل على ما هو طيب عند الله تعالى جزاك الله خيراً بأن يمن عليك بالجنة ورؤية وجهه الكريم جزاك الله خيراً بأن يزحزحك عن النار مثوى الكافرين جزاك الله خيراً بأن يهديك إلى الصراط المستقيم جزاك الله خيراً بأن لا يسلط عليك كل شيطان رجيم جزاك الله خيراً بأن يبارك في رزقك رب العالمين جزاك الله خيراً بأن يجعلك باراً بوالديك إلى يوم الدين جزاك الله خيراً بأن تتبع سنة سيد المرسلين جزاك الله خيراً جزاك الله خيراً جزاك الله خيراً بصراحة الخير كثير عند الله ولا أستطيع أن أحصي كل ما هو خير ولا تظن أنك حين تقول جزاك الله ( ألف ) خير أنَّ هذا أفضل .. فأنت حصرت الخير في كلمة ألف والخير عند الله أكثر بكثير أسأل الله عز وجل أن يتقبل منا أعمالنا وأن يجعلنا من أهل الفردوس إنه على كل شئ قدير ..

السلام عليكم ورحمة الله وبركاته اخوانى الاحبه هديه بسيطه لاحبابى الغالين الاتصال بالاكسيل بجانب البرنامج هذا للتجربه وساقوم بعمل شرح بسيط على المثال المفتوح وارفقه لكم ياليوم ياغدا ان شاء الله تعالى تقبلوا منى اجمل وارق التحيات وتمنياتى لكم بالتوفيق واعتذر لكم على تقصيرى معكم اخوكم المحب لكم احمد conect.rar

ضع في الخلية M2 الإسم مثل العليا و في الخلية L2 طريقة الدفع مثل نقدا و في الخلية K2 نوع العملية مثل جديد ثم في اي خلية أخرى تختارها أكتب الدالة التالية : =SUMPRODUCT(--($D$2:$D$21=M2);--($A$2:$A$21=K2);--($G$2:$G$21=L2);--($F$2:$F$21))

وفقك الله

الرابط يعمل بشكل جيد والحمد لله وهذا هو مرة أخرى http://arabteam2000-forum.com/index.php?/topic/78439-%D9%85%D8%B4%D8%A7%D8%B1%D9%83%D8%A9-%D9%82%D9%88%D8%A7%D8%B9%D8%AF-%D8%A7%D9%84%D8%A8%D9%8A%D8%A7%D9%86%D8%A7%D8%AA-%D8%A7%D9%83%D8%B3%D9%8A%D8%B3-%D8%B9%D9%84%D9%89-%D8%A7%D9%84%D8%B4%D8%A8%D9%83%D8%A9/

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

السلام عليكم تم انشاء قاعدة بيانات 2003 نسأل الله العون و القبول VBALIBRARY2003.rar

اجراء اخر سهل التنسيق الشرطى [text4]>20 ثم اختار اللون المراد اظهاره عن تحقيق الشرط

اسمحولى اشاركم اخى الكريم عند فتح قاعدة البيانات وجدت الاتى قمت انت وضع قيمة لمتغيرات لم تصرح للبرنامج بانهم متغيرات مسبقا فقمنا بالتصريح عنهم كانهم متغيرات رقمية ثانيا وجدنا انه من الصعوبة نسخ رقم المادة من جدولها ثم بعد ذلك لصقها فى النموذج الفرعى قمنا بالتعويض عن ذلك بمربع تحرير وسرد به رقم المادة ليسهل عليك الاختيار واننا نجد هذا خطا ايضا فكيف بك الحال اذا كنت تمتلك 1000 قطعة هل ستحفظ ارقامهم كلهم . ولكن لك ما طلبت اما بالنسبة للمشكله فكود اخونا كرار صحيح زلكن تم وضعه فى بعد تحديث حقل الكمية هذه قاعدة بيانات بها نموذج fbillcr فقط قم بنسخه ولصقه فى قاعدة بياناتك السيد elsayed.rar

السلام عليكم اخي العزيز اشكر اهتمامك بمشكلتي جربت الكود لكنه لم ينفع وضعت الكود في حدث بعد التحديث في اسم المادة ولكن لم تحل المشكلة

و عليكم السلام و رحمة الله و بركاته ... جرب هذا الكود و وافني بالنتيجة DoCmd.GoToRecord , , acNext DoCmd.GoToControl "اسم المادة" تستطيع وضعه بعد تحديث الحقل الذي تريد

الحمدلله تم عمل المطلوب تفضل جرب المرفق Balance1.rar

أخي الغالي أحمد الفلاحجي ..هل طبقت الخطوات بالموضوع أم أنك متعثر ؟ أعلمنا بالنتيجة بارك الله فيك تقبل تحياتي

إخوتي الكرام علماء الإكسيل ومحبيه السلام عليكم ورحمة الله وبركاته بادئ ذي بدء تقبلوا تحية محبكم وأحد تلامذتكم الذين يتشرفون بنهل العلم من معين علمكم الواسع كيف يمكن أن أجمع بين رمز النداء ورقم الهاتف في ملف به أسماء عدة ؟ سؤال رأيت مثيله عدة مرات وأحببت أن أشارككم طرحه،فقد بينت بطريقة متواضعة إحدى الطرق للقيام بذلك ويمكنكم طرح الطرق العديدة باستخدام المعادلات أو الأكواد لإثراء هذا الموضوع ليكون مرجعاً لمن يريد... والسلام عليكم. إحدى طرق إضافة النداء إلى رقم الهاتف.rar

بسم الله ما شاء الله تبارك الرحمن يبدو أن المنتدى قد اكتسب محترف جديد .. واصل أخي الحبيب ياسر بلا فواصل وعلى رأي الصقر (حسام عيسى) إنت بتشتغلنا وتقول مبتديء (عيب عليك الكلام ده) الحمد لله أصبحت الحركة الياسرية في المنتدى هي المهيمنة للآن ياسر فتحي البنا .. ياسر الشيخ .. ياسر خليل أبو البراء .. ياسر العربي أبو أسيل .. والبقية تأتي تقبل تحياتي

السلام عليكم أولا- إنتهيت من تصميم قاعدة البيانات (الجداول) وقمت بإضافة العمود الذي طلبه الاخ يوسف وهو أمر العمل بحيث هو حقل رقم موجود في راس الفاتورة الجداول هي حسب الترتيب في القاعدة: 1- bill: جدول الفاتورة الرئيسي ويحوي على التاريخ والمستلم والمسلم وأمر العمل . 2- bodybill: جسم الفاتورة ويحوي على الاصناف الداخلة والخارجة من المستودع 3- depot: جدول يحوي على المستودعات 4- grp1 -grp2 - grp3 - grp 4 : نظام التصنيف وسأتكلم عنه في مشاركة لاحقة 5- item: جدول يحوي المواد الموجودة في المستودع 6- options: جدول الخيارات والاعدادات الافتراضية 7- user: جدول المستخدمين كلمة مرور قاعدة البيانات هي : syriainmyheat يفضل كما في كل برامجي السابقة المقدمة للمنتدى فك ضغط قاعدة البيانات في القرص D قاعدة البيانات الافتراضية موجود داخل مجلد new وهو قاعدة بيانات فارغة يقوم البرنامج باستخدامها في انشاء قواعد البيانات لكل السنوات وأي معلومات سيتم تسجيلها فيها ستكون افتراضية لكل القواعد المنشأة من خلال البرنامج