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

في الماضي كان في الماضي .. كان الإقتراب من هاتف المنزل محظوراً وممنوعاً ... إلا على الرجال وإذا رنّ الهاتف تتعالى أصواتهم بالأمر من بعيد مَحَّدْ يرُدْ!! فهذا الجهاز الساحر إرتبط بمفهوم الأخلاق والعيب والحياء وكان إقتراب البنات منه عيبٌ ونقيصة بمثل خروجهن في الشارع دون غطاء رأس لذلك لا أحد يرد غير الكبار في الماضي كان أقصى ما يمكن أن يُشاهده الصغار في التلفزيون أفلام الكارتون وأفتح يا سمسم والحكايات العالمية الساحرة، ومغامرات سندباد!! أما فيلم السهرة فحرام حرام أن نسهر عليه فنحن صغار لابد أن ننام مبكرا لكي نستيقظ مبكراً في الماضي كان الأب يُعدّ عملاقا كبيراً فنظرة من عينيه ... تُخرسنا!! وإن ضَحك فإنّ ضحكته تطلق أعياداً في البيت وصوت خطواته القادمة إلى الغرفة تكفي لأن نستيقظ من عميق السبات ... ونقوم لنصلي الفجر!! في الماضي كانت المدرسة التي تبعد كيلوين من المترات كأنها قريبة خطوات من بيتنا لدرجة أننا نمشى إليها ... كل صباح ونعود منها كل ظهيرة، ولم نحتاج إلى باصات مكيفة ولم نخشَ على أنفسنا من خطف ولا عصابات ونحن نندس في الأزقة والحواري لنشتري عصير الفيمتو المثلج في أكواب بلاستيكية ونعود للبيت بملابس تبقعَّت بحُمرته في الماضي لم تكن هناك خشية وتخويف من جراثيم على عربات الباعة الجوالين ولم نعرفها في أرضيات البيوت المكسوة بالبلاستيك ولم نسمع عنها في إعلانات التلفزيون ولم نحتج لسائل معقم ندهن فيه أيدينا كل ساعتين لكننا برغم ذلك ... لم نكن نمرض!! في الماضي كانت للأم سُلطة وللمعلم سُلطة وللمسطرة الخشبية الطويلة سُلطة نبلعُ ريقنا أمامها وهي وإنْ كانت تؤلمنا لكنها جعلتنا نحفظ جزء عم وجدول الضرب وأصول القراءة وكتابة الخط العربي ونحن لم نتعد التاسعة من العمر بعد!! في الماضي كانت شوارع الحي بعد العاشرة مساء تقفر تماما وتصبح فارغة وكانت النساء يمكثن في بيوتهن ولا يخرجن أبداً في المساء وكان الرجال لا يعرفون مكانا يفتح أبوابه ليلاً سوى المُستشفى والمركز والمطار!! في الماضي لم تكن الحكومة تسمح للمجلات والجرايد أن تنشر إعلانات تكبير وتصغير العَوْرات والمُنشطات الجنسية ومواد تحويل السُبلان الى غزلان لأن الرجال كانوا فحولاً ...من دون منشطات والنساء كنَّ غزلاناً بعفتهن وطهارتهن في الماضي كان النقاب والحجاب غريباً وكان الستر بالعباءات السوداء المرسلة على القوام وكان الستر في الوجوه الطيبة الباسمة وكانت أبواب البيوت مُشرعة للجيران وكانت صواني الذواقة تدور كل ظهيرة بين الدور وفي الدرابين والحواري في الماضي لم يَكن الأب مُتعلماً ولا الأم مُثقفة وكان الصغار ينجحون من دون مدرسين خصوصي ويفهمون المناهج من دون دروس خصوصية ويُسجلون النتائج الكبيرة في المدارس الحكومية ولم تكن هناك حاجة إلى مدارس خاصة تدرس فساد الاخلاق بالعربي والغربي في الماضي كان للحياة عطر وأريج وكانت الحياة إجتماعية أكثر طيّبة أكثر ... طعمها طيّب مليئة بالفرح أكثر في الماضي كان هناك خجلٌ وحياء كانت بنتُ الجيران هي عَرضي وأختي أغارُ عليها مثلما أغار على شقيقتي كان هناك في الشارع ... ذوق وأدب وأخلاق ما أجمل قلوب ونفوس تلك الأيام .. ياليتها تعود من بريدى...... واعجبنى تحياتى....لزيارتك موضوعى

اخواني الكرام ابو آلاء وابو محمد سنعتمد الطريقة الاسهل في الشرح في المثال الاخير في المشاركة رقم 10 لا يوجد اكواد ولا ادوات فلترة واعتمدنا في عملنا على التالي : استعلام تحديد وهو مصدر داخلي للتقرير استخرجنا داخله المعدلات والمجموع بطريقة جمع عادية كالتالي : moadl1: Round(([ekhtbar1]+[ekhtbar2]+[ekhtbar3])/3;2) هنا معدل الفصل الاول جمعنا اختبار الشهر الاول + الشهر الثاني + الشهر الثالث ثم قسمناها على 3 اما الرقم 2 فهو خاص بالدالة round ووظيفتها اختصار الخارج العشري والاقتصار على رقمين فقط فلو اردنا الخارج رقما عشريا واحدا فيجب استبدال الرقم 2 بالرقم 1 وهكذا في معدل الفصل الثاني : moadl2: Round(([ekhtbar4]+[ekhtbar5])/2;2) ثم استخرجنا المحصل السنوي : sanawi: Round(([moadl1]+[NISFALSANH]+[moadl2])/3;2 ثم اخرا وليس اخيرا جمعنا الكل وسميناه النتيجة : ntejah: Round(([sanawi]+[NHAIATALSANH])/2;2) واخيرا صنعنا حقلا يشير الى الرسوب : test1: IIf([ntejah]<50;1) ويعني اي مادة تقل عن 50 سيضع امامها رقم واحد تجدون في المرفق هنا انه تم اظهار هذا الاستعلام بدلا من جعله داخل التقرير تنبيه : لفتح الاستعلام يلزم ان يكون النموذج مفتوحا لوجود معايير الصف والشعبة داخل الاستعلام يتبع ... شرح طريقة الفلترة داخل التقرير واستخراج النتيجة حسب الطلاب Drjat8.rar

السلام عليكم ورحمة الله وبركاته الصلاة والسلام علي رسول الله سيدنا محمد النبي الامي أما بعد اسطوانة موسوعة الخطوط العربية الحديثة 2013 للتحميل AIO Arabic Fonts Pack 2013 برابط مباشر صاروخى اسطوانة تجميعية هامة جدا لكل مصمم أو مستخدم للبرامج المكتبية أو حتى أى نوع من أنواع التصميم والكتابات والطباعات اسطوانة بها أجمل وأحدث الخطوط العربية بجميع أنواعها الاسطوانة بواجهة واحدة فقط لسهولة الاستخدام مقسمة إلى عدة أقسام لتتمكن من إضافة ما تفضل من الخطوط دون إجبارك على تحميل كل الخطوط على الويندوز وأنت فى الغالب لا تستخدم إلا ما يعد على أصابع اليد الواحدة فقط فى الغالب الاسطوانة من تصميم أخى أمين ( هيرو سوفت ) ـ الخط الفارسي (19 خط) ـ الخط المغربي (10 خط) ـ خطوط الإعلان (198 خط) ـ الخط المطور (50 خط) ـ الخط البسيط (96 خط) ـ خطوط الديوان (31 خط) ـ خطوط الرقعة (28 خط) ـ خطوط النسخ (66 خط) ـ خطوط الحر (82 خط) ـ خطوط مربعية (46 خط) ـ الخط الكوفي (163 خط) ـ خطوط (54 خط) -------------------------- الاسطوانة مرفوعة على رابط واحد فقط بمساحة 50 ميجا تقريبا الارشيف ميديافاير منقول للفائده بارك الله في كل من له بصمه في هذا العمل

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

اولا البرنامج علي اوفيس 2013 ياساتذه الاوفيس محتاج مساعده ضروري جدا في البرنامج ده لو عجبكم وده انا اخر حاجه قدرت اتوصل ليها بعد مذكره كبيره جدا ده برنامج مصنع ملابس انا بشتغل فيه المشكله عندي في البرنامج ان انا بدخل اجمالي فاتوره واجمالي مرتجع واجمالي الدفعه علشان في الاخر اقدر اطلع تقرير عميل يكون فيه كل شغله انا بقي محتاج حد يساعدني ويقدر يعملي 1 - عايز اعمل صفه في الال عباره عن كرت صنف ندخل فيه اسم الصنف ورقمه وسعره جمله ونوعه شتوي او صيفي 2- فاتوره مبيعات اختار منها رقم الصنف يظهر اسمه تلقائيا وسعره واكتب انا الكميه ويكون فيها نسبه للخصم بتاع العميل انا اللي احدده ولازم ترحل تلقائيا الفاتوره لشيت الفواتير اللي انا عملته 3- عايز فاتوره مرتجع بنفس اللي هيكون في فاتوره البيع بس تكون مرتجه تخصم من حساب العميل ومن الكمبيات وترحل تلقائيا الي شيت المرتجعات 4- اذن اضافه اعداد للاصناف اللي دخلت ارقامها قبل كده لان انا عندي الصنف بيدخل كميته علي عده مرات عايز كل مره تدخلفيها كميه اعملها باند لوحدها بتاريخها يعني اذن اضافه اصناف 5- وعايز في الاخر لما احب اعرف عندي قد اي من الصنف اروح للمخازن اقوله الصنف كذا في اد اي يقولي اد كده انا عارف ان طلبي كبيره بس والله محتاجه جدا جدا جدا لاني شغال في المصنع جديد وعايز اعمل اي حاجه جيده في المصنع من تجربتي ارجووووووووووووووووووو المساعده ولكم جزيل الشكر عملاء المكاتب.rar

Create and manage databases إنشاء و إدارة قواعد البيانات قاعدة البيانات عبارة عن ملف لتنظيم و إدارة البيانات و المعلومات و حفظها بجداول مرتبطة لاسترجاع النتائج ضمن الاستعلامات باستخدام واجهات النماذج و إخراجها بتقارير. 1. إنشاء قاعدة بيانات جديدة 2. إنشاء قاعدة بيانات سطح مكتب 3. إنشاء قاعدة بيانات خاصة بتطبيقات الوب 4. العمل مع تطبيقات قاعدة البيانات 5. استخدام تنسيقات ملفات أكسيس للإصدارات السابقة حمل ملف الدرس الأول ملف pdf حمل ملف الدرس الأول ملف بوربوينت -------------------------------------------------------------------------------------------------

بسم الله الرحمن الرحمن أحبابى السلام عليكم ورحمة الله وبركاته وبعد أقدم إلى حضراتكم ملف صغيراً وبسيطاً لكنه يحتوى على كود - من وجهة نظرى المحدودة - فوق الرائع الفكرة هى أن الملف يغلق اذا لم يكن هناك مستخدم يعمل عليه الاغلاق يتم بعد ترك المستخدم له بدقائق محددة " يتم تحديد الدقائق فى المديول العادى" الكود الرئيسى يوضع فى حدث المصنف اذا رجع المستخدم الى العمل على الملف قبل نهاية المدة يتم تجاهل الكود ولا يتم الاغلاق لو حاولت تغيير عدد الدقائق رغبةً منك فى اطالة المدة فان الكود لا يعمل بالعدد الجديد الا بعد الحفظ والاغلاق واعادة فتح الملف تحياتى / مختار حسين محمود :fff: Timed Closing Of A Workbook.rar

بسم الله الرحمن الرحيم والصلاة والسلام على أول الأنبياء وخاتم المرسلين سيدنا محمد ( صلى الله عليه وسلم ) صلاةً الى يوم الدين إخوانى وأحبابى وزملائى وأساتذتى فى منتدانا العريق السلام عليكم ورحمة الله وبركاته أما بعد يشرفنى أن أقدم لحضراتكم ملفا به كود منقول أكثر من رائع هذا الكود يمكنه أن يظهر لك ما يأتى 1 - عدد البارتشنات فى الهارد ديسك 2 - نوع البارتشنات فى الهارد ديسك 3 - مساحة كل بارتشن والمساحة الكلية للهارد ديسك 4 - المساحة المستخدمة فى كل بارتشن والمساحة الكلية المستخدمة فى الهارد ديسك 5 -المساحة الفارغة فى كل بارتشن والمساحة الكلية الفارغة فى الهارد ديسك 6- اظهار المساحة الكلية و المستخدمة و الفارغة فى أى وحدات التخزين كالفلاشات المتصلة بجهازك طريقة استخام الملف : بسيطة ضغطة زر فقط لا غير ملحوظة 1: اعرف مساحة الهارديسك قبل وضع فلاشة وبعدها ملحوظة 2 : أى تغيير بالزيادة والنقص فى المساحات لديك يظهرها الكود بضغطة واحدة أتمنى أن تسعدوا به لكم منى كل محبة وتقدير واحترام والحمد لله تعالى من قبل ومن بعد *************** Drives names Type Size SpaceFree etc.rar

سؤال لاصحاب الخبرة الله يجزاكم كل خير انا صممت برنامج كبير والحين راح يعملو لي شبكه عشان الموظفين يشتغلو على البرنامج وراح يكون البرنامج على كمبوتري السؤال هل لازم تكون رامات عالية ووندوز سيرف او في كمبيوتري يمكن العمل به رامات 6 ووندوز 7 ؟

السلام عليكم هذا حل بالاكواد كود ملئ اليست دون تكرار Sub RabieCh() Dim ws As Worksheet: Set ws = ThisWorkbook.Sheets("Sales Report") Dim lrw As Long: lrw = ws.Cells(Rows.Count, 1).End(xlUp).Row Dim keyArray(): keyArray = ws.Range("A3:A" & lrw).Value Set sDic = CreateObject("Scripting.Dictionary") Dim i As Long For i = LBound(keyArray) To UBound(keyArray) If Not IsEmpty(keyArray(i, 1)) Then sDic(keyArray(i, 1)) = "" Next i If IsArray(keyArray) Then With Sheet2.ComboBox1 .List = sDic.keys: .ListRows = 20 .MatchEntry = fmMatchEntryNone .TextAlign = fmTextAlignRight End With choix1 = sDic.keys End If End Sub كود البحث داخل اليست (فلترة) If Me.ComboBox1.ListIndex = -1 And IsError(Application.Match(Me.ComboBox1, choix1, 0)) Then Me.ComboBox1.List = Filter(choix1, Me.ComboBox1.Text, True, vbTextCompare) Me.ComboBox1.DropDown End If لم افهم اين تريد انتائج ان شات وضح الامر لاعدل في الاكواد تحياتي للجميع قائمة منسدلة بدون تكرار مع إمكانية البحث داخل القائمة.rar

اخي الفاضل هل قمت بتقسيم البرنامج الي واجه تشمل النماذج والاستعلامات والتقرير والمايكرو \ والي جداول تشمل الجدول

اي القاعدة مقسومه وعدد المستخدمين لادخال البيانات تقريبا ال 20 مستخدم وحجم القاعدة 65 ميغا بايت وللان ماتم تعبئتها واعتذر منك حبيبي اسأت الفهم ياغالي اعتذر

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

السلام عليكم بعد اذن الأساتذة هذا كود لحذف محتويات أكثر من ورقة عمل مع رسالة تنبية يوضع فى حدث المصنف : ( غيّر التاريخ كما تشاء ) Private Sub Workbook_Open() If Date > #1/30/2015# Then For Each x In ThisWorkbook.Sheets x.UsedRange.Clear Next ThisWorkbook.Save MsgBox "sorry all data delated by mokhtar " End If End Sub تحياتى

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

. Error+.rar

. LETTER+.rar

اخواني اعضاء المنتدي الكرام مرفق ملف يحتوي على فورم لترحيل البيانات المدرجة بالفورم مع امكانية تحديد الصفحة التي يتم الترحيل اليها اولا يتم اختيار الصفحة المطلوب الترحيل اليها ثانيا اختيار التاريخ لادراجة و هذا يمكن تعديلة الي أي شئ تريدة يمرر الماوس علي الخلية الثالثة و التي يتم وضع التاريخ آاليا بها بمجرد مرور الماوس عليها و في كل مرة يتم تغيير التاريخ يتتغير ايضا بمرور الماوس يتم ملئ باقي البيانات اخر خانة تظهر تلقائي وهذا بسبب احتياجي لها و لكن يمكن تغيرها أيضا يمكن أضافة أي عدد من الاعمدة حسب حاجتك مع مراعات انة في هذه الحالة يتطلب تعديل النطاق ليتضمن الاعمدة الجديدة في الخلية "c2" تم وضع كود ليتم وضع اسم الصفحة اخيرا يمكن اضافة اي عدد من الصفحات أبضا مع تعديل النطاق بمعني انة ملف يمكن أن يكون مفنوح بشكل مرن اتمني أن ينال اعجابكم """ دعاء الي والدي و أخي رحمة الله عليهما اللهمّ إنّه كان يشهد أنّك لا إله إلّا أنت وأنّ محمّداً عبدك ورسولك وأنت أعلم به === عندما نبحث عن كلمات شكر وتقدير للآخرين, فإن اجمل عبارات الشكر والتقدير لابد أن تسبق حروفنا وتنهي سطورنا معبرةً عن صدق المعاني النابعة من قلوبنا لهؤلاء Years Project Reports.rar

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

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

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

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

أخي ياسر إنت رجل قديم ..يعني المفروض عنوان الموضوع يكون معبر عن الموضوع . متعملهاش تاني !!! إليك الكود التالي ... الكود سوف يستغرق حوالي 4 أو 5 دقائق نظرا لحجم البيانات الهائلة الموجودة بالملف .. وأنصحك ألا تستخدم التنسيقات الكثيرة التي تسبب كبر حجم الملف Sub SUMIFSVBA() Dim Cell As Range Dim LR As Long Dim rngNetValue As Range Dim rngNames As Range Dim rngGroup As Range Dim X As Double, Y Dim ICol As Long LR = Sheet1.Cells(Rows.Count, 1).End(xlUp).Row Set rngNetValue = Sheet1.Range("F2:F" & LR) Set rngNames = Sheet1.Range("L2:L" & LR) Set rngGroup = Sheet1.Range("C2:C" & LR) Application.ScreenUpdating = False Application.Calculation = xlCalculationManual Application.EnableEvents = False On Error Resume Next For ICol = 5 To 122 Step 3 For Each Cell In Sheet2.Range("A6:A51") If IsNumeric(Cell) Then Y = Application.WorksheetFunction.Index(Rows(4), 1, Cell.Offset(, ICol - 1).Column - 1) X = Application.WorksheetFunction.SumIfs(rngNetValue, rngNames, Cell.Offset(, 1), rngGroup, Y) Cell.Offset(, ICol - 1).Value = X End If Next Cell Next ICol MsgBox "تم بحمد الله" Application.EnableEvents = True Application.Calculation = xlCalculationAutomatic Application.ScreenUpdating = True End Sub

شاهد المرفق التالي البحث باستخدام فورم وان كان غير ذلك فمزيد من التوضيح تقبل خالص تحياتي فورم بحث دون الاغلاق.rar

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

أخي الفاضل أهلا بك ومرحبا في المنتدى .. اسمح لي بما أن هذه أول مشاركة لك ... ينبغي أن تعرف قواعد المنتدى .. أنت وضعت عنوان مناسب يدل على طلبك .. ولكن الموضوع لا يجب أن يكون هكذا لابد من بعض التفاصيل .. ويستحب ملف مرفق للعمل عليه توفيراً للوقت والجهد عموما يا عبدو إليك الملف التالي لعله ينال رضاك ومتنساش تختار الإجابة كأفضل إجابة (دا لو عجبك الملف !!) تقبل تحياتي ColorFunction UDF Function.rar

الأخ الفاضل أحمد بهجت تفضل الكود التالي : Sub FilterData() Dim strCriteria As String strCriteria = Sheet1.Range("C3").Value On Error Resume Next With Sheet1 .AutoFilterMode = False .Range("E2:O2").AutoFilter Field:=11, Criteria1:=strCriteria .Range(("E2:O") & .Cells(Rows.Count, 5).End(xlUp).Row).Sort Key1:=.Range("F2"), Order1:=xlAscending, Header:=xlYes End With End Sub AutoFilter & Sort VBA.rar

حياك الله اخي الكريم في اشياء ممكن تسويها بدون استعلام وبحدث بسيط تابع ماعرف اكتب الشرح عشان كذا ادور لك على شرح بالصوت والصورة . وهنا شرح بسيط مثلا لوكان عندك في النموذج حقل بإسم book1 وحقل ثاني بإسم book2 وبعدها في حقل بإسم quantity total في حدث بعد التحديث لــ book 2 نضع الكود quantity total =[book1]+[book2] وهكذا سواء جمع او طرح او اضرب اوقسمة ولحقل واحد أو اكثر بالتوفيق

حياك الله اخي هذا الفيديو ان شاء الله راح يفيدك كثير في موضوعك .. بسيط ومفيد بالتوفيق

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

بالنسبة للجداول فهي من عملك اخي انا فقط ربطتها بالعلاقات .. بانسبة للنماذج من خصائص النموذج في عرض التصميم اجعلها منبثقه. بالنسبة للنموذج main . من انشاء ,,, تصميم نموذج ... سوف يظهر لك نموذج فارغ ادرج بداخله ... نموذج ttrans بطريقة السحب والإفلات. لو لك سؤال آخر تفضل . بالتوفيق ان شاء الله.

اخي الكريم جرب المرفق النموذج main هول البحث عن القطع المسجلة للموديل المختار في جدول ttrans Model.rar

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

السلام عليكم ورحمة الله وبركاته ادخل المعادلة التالية في الخلية G4 ثم اسحبها لبقية الخلايا =SUMPRODUCT(LARGE(('اذون الاستلام'!$F$4:$F$2000=$B4)*('اذون الاستلام'!$B$4:$B$2000);COLUMNS($G:G))) المعادلة ترجع الارقام مرتبة تنازليا او المعادلة التالية ترجع الارقام حسب موقعها =INDEX('اذون الاستلام'!$B:$B;4^8-SUMPRODUCT(LARGE(('اذون الاستلام'!$F$4:$F$2000=$B4)*(4^8-ROW('اذون الاستلام'!$F$4:$F$2000));COLUMNS($G:G)))) لإخفاء الصفر يمكن اضافة الدالة TEXT الى المعادلتين مثلا للمعادلة الاولى =TEXT(SUMPRODUCT(LARGE(('اذون الاستلام'!$F$4:$F$2000=$B4)*('اذون الاستلام'!$B$4:$B$2000);COLUMNS($G:G)));"General;General;") في امان الله

السلام عليكم إخواني وأحبائي وجدت علي موقع أجنبي قائمة للمبتدئين في تعليمات وبرمجيات الفيجوال بيزيك للاكسل القائمة علي شكل فهرس ولم أفعل غير تنسيقها فقط بالإكسل تفضلوا القائمة بصيغتي 2003 ، 2007 عسي الله أن ينفع بهما Excel VBA Index.rar

رابعا : الوحدات النمطيه تعريف جميع أنواع المعرفات و الوسائط المستخدمه في الأكواد كيفية كتابة روتين فرعي أنواع المتغيرات و تعريفاتها جميع أنواع الأخطاء و أرقامها في الأكسس معرفة أكواد ال ASCII شرح دوال التاريخ و الوقت كود لمعرفة هل يقع التاريخ ضمن الاسبوع الحالي أم لا كيفية جعل يوم السبت أول ايام الأسبوع برنامج منشىء التقاويم المقارنة - ميلادي - هجري - أم القرى كود لمعرفة أول و آخر يوم في الشهر الميلادي كود لتجاهل الهمزه عند البحث كيفية تشغيل ملف صوتي دالة تفقيط بالعربي و الانكليزي دالة مع مثال لصندوق الرسائل باللغه العربيه كود لتنسيق رسائل الادخال على نمط كلمة سر كيفية جعل واجهة النموذج عربي - انكليزي اخفاء أشرطة الأدوات بالكود أداة لتنسيق حقل المذكره كما في الوورد كود اغلاق البرنامج في توقيت معين أو بعد مضي فترة زمنية معينة دالة لتقريب الأرقام لأقرب نصف مثال لطريقة حساب العمر كود لاعادة ترتيب الترقيم التلقائي لسجلات الحقل اضافة سجل باستخدام ADO اضافة سجل باستخدام DAO اضافة سجل بتشغيل جملة SQL اضافة عنصر ActiveX بالكود كود الغاء علامة الاستعلام المعلمة كيفية منع المستخدم من اغلاق النموذج كود للتأكد من اغلاق جميع النماذج المفتوحة اضافة أسماء الملفات في مجلد الى حقل في الجدول كود لتغيير رمز سواقة الأقراص المدمجة كود لانشاء قاعدة بيانات جديدة مع تحديد كلمة السر لها كود لعمل فورمات أكواد التعامل مع الملفات و المجلدات انشاء علاقة بين جدولين بالكود و طباعة العلاقة اضافة حقل بالكود كود فتح قاعدة بيانات خارجية عمل فاصل زمني بين أمرين برمجيين كود تغيير اللغة الحالية تشغيل تطبيق خارجي من الأكسس تغيير خيارات بدء التشغيل برمجيا التجكم بأزرار لوحة المفاتيح برمجيا تصدير البيانات الى الوورد استخدام المفاتيح بطريقة SendKey اضافة ملف فلاش في قاعدة البيانات كود للاعلام بامتلاء القرص المرن

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

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