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

أخي الكريم نور وحيد إليك الملف التالي إثراءً للحل Multi Data Validation List YasserKhalil.rar أخي الحبيب ياسر العربي حلك رائع جداً ..إضافة بسيطة لحلك هو إمكانية جعل القوائم كلها مطاطية أي غير ثابتة إليك حل المتميز ياسر العربي بإضافة بسيطة وهي جعل القوائم ديناميكية Multi Data Validation List Araby.rar

نرحب يالأخوة حسام (الصقر) و ياسر العربي و ابراهبم ابو ليلة في فريق الموقع و نهنئ أنفسنا بانضمامكم لفريق الموقع و جزاكم الله خيرا على جهودكم في نشر العلم و افادة الأعضاء

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

من منا من لم تحدث له هذه المشكلة وهي تعليق قاعد البيانات في الذاكرة فلا تفتح ولا تقفل مما يضطر البعض إلى إعادة تشغيل الجهاز إليكم هذه الطريقة البسيطة لتجاوز هذه المشكلة 1- اضغط على ctrl+Alt+Delet فيظهر أمامك إطار إدارة المهام افتح على تبويب التطبيقات كما في الصورة اليمنى ثم أشر عل قاعدة بياناتك فستلاحظ أن زر إنها المهمة أصبح فعالا فانقر عليه لإنهاء تشغيل القاعدة . 2- إذا لم تجد قاعدة بياناتك في هذا التبويب فافتح تبويب العمليات كما في الصورة اليسرى ولاحظ الاسم الذي تم التأشير عليه فهذا الاسم خاص بقواعد بيانات أكسس أشر عليه ثم اضغط انهاء العملية في الأسفل . مسألة صغيرة أرجو أن يكون نفعها أكبر ،،،

السلام عليكم اليكم طريقتي بدون عنصر الصورة ، وانما وضعت الصورة على الزر مباشرة 1. عملت صورة مائلة الى السواد لكل الازرار ، حيث سنستفيد منها عند الضغط على الزر حتى تعطينا الشعور بضغطة الزر وكتبت الكلمة التي يجب ان تكون على الزر ، حيث ان اعدادات الزر يأخذ احدهما: الكلمة/النص او الصورة ، ولا يأخذهما معا: . 2. هذه اعدادات الزر ، وسنجعل الصورة على خاصية Picture للزر: . وهذا كود ثلاثة احداث تقوم بالعمل: Option Compare Database Dim image_Path As String Private Sub cmd1001_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Me.cmd1001.Picture = image_Path & "\01-1.bmp" End Sub Private Sub cmd1001_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Me.cmd1001.Picture = image_Path & "\01.bmp" End Sub Private Sub Form_Load() On Error GoTo err_Form_Load image_Path = Application.CurrentProject.Path & "\icons" Me.cmd1001.Picture = image_Path & "\01.bmp" Me.cmd2005.Picture = image_Path & "\02.bmp" Me.cmd3008.Picture = image_Path & "\03.bmp" Exit Sub err_Form_Load: If Err.Number = 2220 Then Resume Next Else MsgBox Err.Number & vbCrLf & Err.Description End If End Sub . والنتيجة: . جعفر 235.Desktop.zip

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

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

ربما كان المطلوب Aziz2 salim.rar

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

السلام عليكم أخي الحبيب أبو البراء لاحظت أن الميديا فاير أسهل وأبسط في تنزيل الملفات الحمد لله وجزاكم الله خيراً البرنامج قيد التنزيل ...أرجو أن يتم ذلك قبل انقطاع الكهرباء..

الف مبروك للاخوة الاعزاء .. اتمنى لهم التوفيق

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

الف الف مبروك عقبالنا لما نتظور ونصبح امثالهم

الف مبروك للاخوة الاعزاء .. اتمنى لهم التوفيق

أحبائى الكرام أخي الحبيب الغالى / حسام عيسى أخي الغالي / ياسر العربي أخي الحبيب الغالى / إبراهيم أبو ليلة ألف ألف مليون مبروك على الترقية المستحقة تقبلوا جميعا خالص تحياتى وتقديرى

السلام عليكم ورحمة الله وبركاته في احد البرامج التي اشتغلت عليها ، كان المطلوب احد الاشياء التالية مثلا: مدة الخدمة ، من تاريخ التوظيف الى اليوم ، إضافة خدمة (سنوات/اشهر/ايام) الى تاريخ التوظيف ، خصم مدة (سنوات/اشهر/ايام) من تاريخ التوظيف ، فبدل الحساب اليدوي ، عملت نموذج لآلة حاسبة ، للتواريخ النموذج frm_Date_Diff : حساب الفرق بين تاريخين: 1. ادخل التاريخ الاكبر في الحقل 1 ، وعند تغيير التاريخ سنرى الفرق بين التاريخين في الحقول سنة/شهر/يوم ، 2. ادخل التاريخ الاصغر في الحقل 2 ، وعند تغيير التاريخ سنرى الفرق بين التاريخين في الحقول سنة/شهر/يوم ، وعند النقر المزدوج على 1 او 2 ، فان القيم سيتم حفظها في الحقول 11 و 22 مؤقتا ، بحيث تستطيع ان تقوم بعمليات اخرى وتغيير التواريخ ، بينما تحتفظ بأصل التواريخ في 11 و 22 ، إضافة / طرح (سنوات / اشهر / ايام) من تاريخ: 1. احذف التاريخ من الحقل 2 ، 2. ادخل سنة/شهر/يوم الى الخانات 3 و4 و5 ، 3. حسب الحاجة ، اختر 6 لإضافة السنة/شهر/يوم الى التاريخ الاول ، وسترى النتيجة في الحقل 2 ، 4. حسب الحاجة ، اختر 7 لطرح السنة/شهر/يوم من التاريخ الاول ، وسترى النتيجة في الحقل 2 ، وعند النقر المزدوج على 3 او 4 او 5 ، فان القيم سيتم حفظها في الحقول 543 مؤقتا ، بحيث تستطيع ان تقوم بعمليات اخرى وتغيير السنوات/الاشهر/الايام ، بينما تحتفظ بالاصل في 3 و4 و5 وهنا مثال متحرك: جعفر 301.Dates_Calculations.mdb.zip

بسم الله والصلاة والسلام على رسول الله وعلى آله وصحبه ومن والاه السلام عليكم ورحمة الله وبركاته... أقول لولدي الذي يحن ويتلهف قلبي لرؤيته ولو للحظة والذي أكرمني الله بحفيدة منه حيث لم أشهد عرسه ...أسماها { إسراء} الحمد لله الذي رزقك زوجة ولوداً، وجعلك ممن تخلفه ذريته. فكم من رجل عقيم لا يولد له ولد، وكم من امرأة كذلك. فهذه نعمة عظيمة { الْمَالُ وَالْبَنُونَ زِينَةُ الْحَيَاةِ الدُّنْيَا } [الكهف:46] ولهذا فاستقبل عطية الله عز وجل بفرح وسرور وشكر وحمد، ذكراً كانت هذه العطية أم أنثى. فيكفي أنها سليمة الأعضاء، مكتملة النمو، خالية من الأمراض، فتبارك الله أحسن الخالقين الذي وهب وأعطى بمنه وفضله: {يَهَبُ لِمَنْ يَشَاءُ إِنَاثاً وَيَهَبُ لِمَن يَشَاءُ الذُّكُورَ (49) أَوْ يُزَوِّجُهُمْ ذُكْرَاناً وَإِنَاثاً وَيَجْعَلُ مَن يَشَاءُ عَقِيماً} [الشورى:50،49] وقد وُلد للنبي r أربع من البنات - رضي الله عنهن - ولما ولد لإمام أهل السنة أحمد بن حنبل رحمه الله بنت قال: {الأنبياء آباء البنات، وقد جاء في البنات ما علمت } أي من فضل تربيتهن القيام عليهن. وكُره البنات من عادات الجاهلية؛ أما في الإسلام فإنهن من الأبواب الموصلة إلى الجنة قال : r {من عال جاريتين حتى تبلغا، جاء يوم القيامة أنا وهو هكذا} { وضم أصبعيه} [رواه مسلم]. بورك لك في الموهوبة وشكرت الواهب وبلغت رشدها ورزقت برها وأرجو الله أن يجعل ذرياتكم صالحين ناصحين بارين والسلام عليكم ورحمة الله وبركاته

Protect and maintain databases حماية و صيانة قواعد البيانات 1. ضغط و اصلاح قاعدة البيانات تساعدنا في تحسين أداء قاعدة البيانات و اصلاح الملف عند حدوث المشاكل. 2. تشفير قاعدة البيانات بتطبيق كلمة مرور لتقييد الوصول, فقط المستخدمون الذين يعرفون كلمة المرور يستطيعون الوصول الى قاعدة البيانات. 3. العمل مع النسخ الاحتياطي. 4. دمج قواعد البيانات. 5. تقسيم قاعدة البيانات و هي خطوة تطبق خصيصا للمشاركة مع عدة مستخدمين. ------------------------------------------------------------------------- ------------------------------------------------------------------------- تحميل ملف PDF https://www.dropbox.com/s/00e1yxc9rf60rlo/Lesson14.pdf?dl=0 تحميل ملف البوربوينت https://www.dropbox.com/s/xz2wt4p4y4ahvxi/Lesson14.ppsx?dl=0 -------------------------------------------------------------------------

بورك لك في الموهوبة وشكرت الواهب وبلغت رشدها ورزقت برها الف مبروك تترباء في عز والديها

لم أفهم الموضوع بشكل كامل ولكن هذه محاولة المستخدم : ADMIN المرور : 3333 صلاحية دخول مع حفظ التغييرات1.rar

آسف لم ألاحظ الخطأ سوى الآن حضرتك لحظ السطر الأول بالكود ستجد اسم مربع النص ( نص 184) وليس a11 1- غير اسم مربعى النص الى a11 & a11Hijri كما تريدهما أولا 2- أرجع الجملة التى حذفتها من قبل - .text- كما كانت ووافنا بالنتيجة

تفضل اخي لعله المطلوب قائمة منسدلة متعددة المصادر.rar

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

بارك الله فيك أخي الفاضل أحمد على المعلومة التي قد تغيب عن أذهان الكثيرين بالفعل أي خلل في إدخال البياانات في كثير من الأحيان يؤدي إلى مشاكل في التعامل مع الملف والأكواد تقبل تحياتي

الف الف مبروك للاساتذه الكرام أ / حسام عيسى أ / ياسر العربي أ / إبراهيم أبو ليلة ومن نجاح الى نجاح

وأبو الشباب بعد والنِعم ، والسبعة انعام ، وانا أشهد على هذا تم غالي والطلب رخيص بس بدل ما اخلي بياناتي في الرابط اعلاه ، والقليل اللي بعرف عنه ، انا بخلي هذه المعلومات في ملفي الشخصي: http://www.officena.net/ib/profile/142414-jjafferr/?tab=field_core_pfield_25 جعفر

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

السلام عليكم ألف ألف مبروك للإخوة الأفاضل : حسام " الصّقر " ياسر العربي إبراهيم أبو ليله بارك الله فيكم جميعا وجزاكم الله خيرا

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

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

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

مشكور اخي سليم على الحل الرائع ومرفق حل بسيط اخر Aziz2.rar

كل الشكر والتقدير للاخوة في تقديم المساعدة واشكر لكم روح التعاون التى اراها وجزاكم الله كل الخير المرفقات ___________________ شرح المتغيرات والثوابت.rar شرح كيفية ربط الفيجوال دوت نت بالاكسيل والتعامل معه.rar تشغيل البرنامج ولمحة عن الشاشة الرئيسية.rar تطبيق اول مثال على الفيجوال دوت نت آله حاسبة.rar تطبيق مثال آله حاسبة بكود اخر وتوضيح شكل محرر الاكواد.rar for next.rar

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

الف مليووووووون مبروك للاخ حسام عيسى وياسر العربى وابراهيم ابوليلة خير اختيار وخير الناس والشكر موصول لمؤسس هذا الصرح المهندس محمد طاهر

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

أخي الكريم رميلي تم فك حماية المصنف وعمل معادلة بسيطة جداً تعتمد على الخلية N1 في ورقة العمل (صفحة المعلومات) المسماة 333 إليك الملف المرفق عله يؤدي الغرض ..تم إخفاء العمود N في ورقة المعلومات (قائمة التلاميذ) المسماة 333 تقبل تحياتي CERTIFICAT.rar

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

السلام عليكم ورحمة الله مبروك للإخوة الأفاضل

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

السلام عليكم ورحمة الله اولا / الشكر الجزيل للاخ الفاضل الاستاذ سليم حاصبيا --------------------------------------------------------------------------- ثانيا / بعد إذن الاستاذ سليم المشكله في اصطياد السمكة يا استاذ ياسر ليس شرح الكود لانه حتى لو شرح الكود ينقصه من ان الكود مبني علي خطوات مسبقه إليكم الخطوات المسبقة محاوله مني: اولا / نقوم بتعريف المدى اللي بالكود والمسمى Prot_Range نذهب إلي الشيت المسمى Sheet1 ثم من شريط الادوات نذهب إلي صيًغ ثم إدارة الاسماء ثم جديد ونضع الاسم Prot_Range ونشير للخلايا أي نحدد الخلايا حسب رغبتنا في تطبيق العمل عليها وهنا في عمل الاستاذ سليم اشار للخلايا من A1 إلي Z255 ثم موافق خلاص إنتهينا من تسمية النطاق او المدى.والآن يأتي دور الاكواد نذهب لمحرر الاكواد الخاص بالصفحة Sheet1 عام أي في ال General ونضع هذا الإجراء : 'xxهنا نقوم بتسمية إجراء ونسميه اي إسم اي حرف وهنا إسمه Sub xx() ' salim يقوم بإلغاء الحماية من علي الصفحة النشطه والتي كلمة المرور الخاصة بها هي ActiveSheet.Unprotect "salim" إذاً' Prot_Rang إذا لم يتقاطع الإختيار بمدى النطاق المسمى If Not Intersect(Selection, Range("Prot_Range")) Is Nothing Then ' هنا الإشارة للمجال المختار وهو مدى النطاق في الصفحة النشطة بالخاصية With With ActiveSheet.Range("Prot_Range") ' تنشيط إقفال الخلايا .Cells.Locked = True 'عدم إقفال الخلايا الفارغة التي لايوجد بها بيانات .Cells.SpecialCells(xlCellTypeBlanks).Locked = False ' إغلاق الخاصية With End With ' يقوم بحماية الصفحة وعمل كلمة المرور salim ActiveSheet.Protect "salim" End If ActiveSheet.Protect "salim" End Sub ثم نضع الكود التالي في حدث تغيير الصفحة Sheet1 Private Sub Worksheet_Change(ByVal Target As Range) ' إذا لم يتقاطع الهدف بالمدى وان نتائج الهدف يساوي واحد ‘ذاً If Not Intersect(Target, Range("Prot_Range")) Is Nothing And Target.Count = 1 Then ' عدم تمكين تطبيق الاحداث Application.EnableEvents = False 'هنا بعد إدخال اي بيانات تأتي رسالة تفيد حسب الموضح في الرسالة mess = MsgBox(" بعد ادخال البيانات سوف يتم اقفال هذه الخلية" & vbNewLine & _ "لا يمكن تغييرها الا من خلال كلمة السر في حال الموافقة اضغط نعم", vbYesNo, "تنبيه") ' عند الموافقة If mess = vbYes Then 'xxهنا يتم إستدعاء الإجراء والمسمى xx ' عند عدم الموافقة Else ' تراجع عن التطبيق Application.Undo End If End If ' تمكين تطبيق الاحداث Application.EnableEvents = True End Sub

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

هلا باخي ابوعبيد ان شاء الله ستحل عملت لك بعض التغييرات بحيث تعمل و الملف مشارك ...جرب الكود هذا وخبرنا كلمة السر 111 كما في الملف المرفق With ActiveWorkbook Application.DisplayAlerts = False .ExclusiveAccess Application.DisplayAlerts = True ActiveSheet.Unprotect 111 [A2] = [A1] ActiveSheet.Protect 111 Application.DisplayAlerts = False .KeepChangeHistory = True .SaveAs Filename:=ActiveWorkbook.FullName, AccessMode:=xlShared Application.DisplayAlerts = True End With تشغيل ماكرو في ملف مشارك.zip

السلام عليكم ورحمة الله وبركاته ^_^ اخواني حاولت ان اضيف عدة شروط الى الــ if ولاكن لم يقبل الاكسل ذالك لماذا هل الخللل في المعادلة وطريقتي في صياغتها ام ان الاكسل لا يدعم الامر هذا شاكر لكم وضحت لكم الجدول والمعادلة في المرفقات 999.rar

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

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

قاعدة IF تستوعب عدد كبير من الشروط وبدون آند أو أور تصل إلى 14 شرط وفى حالة IF and , IF OR قد تصل إلى أضعاف هذا الرقم وهناك ملف للأخ الكبير الخبير خبور خير يوضح العدد الكبير من الشروط الذى يمكن أن تعمل قاعدة إف بها

شكرا وفقك الله ^_^

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

جرب هذه المعادلة: =IF(J23<=L23;"ttt";IF(J23<=L25;"yyyy";"mmm")) والحل في المرفق 999-1.rar