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

إذاً كما ذكرت أ يتم التعامل مع التحديد بهذا الشكل في أكثر من سطر جرب الكود بهذا الشكل Sub trheel() Dim CL As Range, I As Integer For I = 2 To 4 For Each CL In Range("H2:H" & [H10000].End(xlUp).Row) If CL.Value = Sheets(I).Name Then CL.Offset(0, -6).Resize(1, 1).Copy Sheets(I).Range("B" & Sheets(I).[B10000].End(xlUp).Row + 1) CL.Offset(0, -3).Resize(1, 1).Copy Sheets(I).Range("E" & Sheets(I).[B10000].End(xlUp).Row) CL.Resize(1, 1).Copy Sheets(I).Range("H" & Sheets(I).[B10000].End(xlUp).Row) End If Next Next End Sub تقبل تحياتي

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

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

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

أخي الكريم الغالي سعد عابد أعتذر عن التأخر في الرد على موضوعك إليك الكود التالي وإن شاء الله يفي بالغرض Sub PutSUMFormulas() Dim I As Long, II As Long II = 6 For I = 6 To 48 If IsEmpty(Cells(I, 2)) Then With Cells(I, 3).Resize(, 21) .Interior.Color = RGB(192, 192, 192) .Formula = "=SUM(R[-" & I - II & "]C:R[-1]C)" End With II = I + 1 End If Next I End Sub ولا تنسى أن تحدد أفضل إجابة ومش بس كدا أن تضغط على أعجبني هذا (إلا إذا لم يعجبك فلا تضغط عليها ) تقبل الله منا ومنكم وكل عام وأنتم بخير Put SUM Formulas By Code.rar

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

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

عسى ان يكون المطلوب بالنسبة للسرعة (الامر يستغرق 1.5 ثانية) تم تبديل الملف لان الاصلي يحتوي على فيروس ناجح راسب.rar

اخى ابوالبراء ياسر خليل كل عام وانت بخير هذا هو المطلوب اشكركككككككككككككككككككككككككككككككك جزاك الله خيرا اكرمكم الله اعزكم الله

رائع

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

السلام عليكم و رحمة الله و بركاته ... الأخ محمود .. بارك الله بك ... بالنسبة لموضوع المنع , فكما قلنا أن أي شي يغير في عملية التوزيع تعديله صعب ....لأنه يغيير الكثير (و قد ينسف كامل عملية التوزيع) .. بالنسبة للتضارب بين التبيت و المنع .. فالقاعدة كلها بحاجة لإعادة صياغة القيود ... نحن لم نضع أي قيود حتى الآن .. ارفق لكم أكواد عملية التوزيع مع تطبيق التوزيع بكلمة المرور .... و اتمنى أن تجد مساعدة من الإخوة هنا .. فأنا للأسف وقتي لم يعد يسمح لي .. و السلام عليكم و رحمة الله ... بالتوفيق... C#_Mosque.zip

جعلها الله في ميزان حسناتك

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

استاذى الحبيب / محمد حسن والاستاذ الغالى / ياسر خليل هذه النسخه هى الاصدار الاول بتاريخ 30-9-2014م وكان تخص فقط 2014 وذالك لسببين الاول / اننا نتعامل مع ملف اكسيل فى النهايه يعنى لابد من مراعاة حجم البرنامج حتى لا يسبب ثقل للملف وبطئ شديد فى التعامل معه فكان لابد من يكون لكل سنه ملف خاص بها ثانيا / من الناحيه المحاسبيه يجب اقفال كل عام مالى برصيد ختامى وتسجيله برصيد افتتاحى فى عام مالى جديد اما الهدية ان شاء الله غير منقطعه والدليل على ذالك هذا الرابط من 1-1-2015م وهى نسخه عام 2015م http://www.officena.net/ib/index.php?showtopic=57962&hl= وان شاء الله كل عام هينزل نسخته هنا هدية للكل بالمنتدى وبخصوص موضوع الحمايه هو للحفاظ على البرنامج وعدم العبث فيه ولمن يريد التعلم التعلم يكون بالدروس الغزيرة اللى موجوده بالمنتدى والذى افاض بها اساتذتنا الكرام ومنوا بها علينا لان لكل برنامج خبايا وكل برنامج قائم على فكرة صاحبه فمن الصعب فهما ارتباط الاكواد بعضها البعض فى بعض الاحيان وانتظرو قريبا جدا برنامج EMA بشكله الجديد المختلف كليا وجزئيا عن الاصدارين السابقين

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

السلام عليكم رحمة الله وبركاته كيف الحال إخوتي الكرام الشرح في الملف المرفق لأنني لم أعرف كيف أعبر عن الفكرة ...بارك الله فيكم 2.rar

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

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

لقد قمت بالتحديد كأفضل اجابة ... مع الشكر لتعاونكم

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

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

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

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

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

بارك الله فيكم إخواني الأحباب إليكم معادلة الصفيف التالية لعلها تضاف إلى بقية المعادلات .. نريد التركيز في الموضوع على الحصول على آخر قيمة سواء أكانت القيمة نصية أو رقمية =OFFSET($B$2,MAX(IF(NOT(ISBLANK($B$3:$B$22)),ROW($B$3:$B$22),0))-ROW($B$2),0) وننتظر ملف آخر من الأخ الحبيب محمد الريفي يجمع بقية المعادلات المقدمة من كل الأخوة الكرام

مثال بصيغة MDB 123.rar

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

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

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

بارك الله بك أخ محمود ... بالتوفيق ..

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

السلام عليكم و رحمة الله و بركاته .... بارك الله بك أخ محمود .. و جزاك الله خيرا ... للقاعدة المقسمة فائدتين رئيسيتين : الأولى أن حجم النسخ الاحتياطية سيكون قليل نسبيا , لأننا فقط نعمل نسخ احتياطي للجداول في القاعدة (msajed_be.mdb) و لا ننسخ اي شئ من النماذج و التقارير و الاستعلامات المتواجدة في القاعدة (msajed.mdb) ...الفائدة الثانية هي إمكانية العمل المشترك في المؤسسة على نفس قاعدة البيانات (شرط وجود شبكة) , بحيث يمكن فتح نفس القاعدة من أكثر من جهاز كمبيوتر .. نحن نخزن ملف الجداول على جهاز محدد و نوزع ملف النماذج على باقي الاجهزة و نربطه بملف الجداول .... بحيث يمكن أن تعمل توزيع من كمبيوتر ما , ثم باقي الاجهزة تقوم بطباعة التقارير و الاستعلامات مثلا من هذا التوزيع .. لاحظ الفائدة من ذلك , لو كانت القاعدة غير مقسمة فلا يمكن العمل المشترك عليها بل يعمل عليها شخص واحد فقط من جهاز واحد .. اتمنى أن الفكرة وصلت .... مساوئ التقسيم : أنه بحاجة لإعادة ربط الجداول لو تغيير مكان ملف الجداول ...و بحاجة لشخص لديه خبرة (و لو بسيطة) بإعادة الربط ... لو كنت تريد أن يعمل على القاعدة شخص واحد و كانت البيانات صغيرة نسبيا , يمكن الدمج بملف واحد و العمل على ملف واحد يعمل من أي مكان (على الفلاشة أو سطح المكتب , لا فرق). تطبيق التوزيع يعمل سواء أكانت القاعدة مقسمة أو غير مقسمة ... أنت اختر ما تريد (تقسيم أو ملف واحد) و اخبرني بذلك ....لكن تذكر لو طلبت ملف واحد , فلن تستطيع العمل المشترك على القاعدة .. ملاحظة : عملية تقسيم و دمج القاعدة هي عملية سهلة جدا , هي عبارة عن خيارت في القوائم لا أكثر ... بالتوفيق ..

حيا الله اخوي السيد سليم و السيد الصقر الجريح بعد اذان الجميع ..المعادلات صحيحة مع تعديل بسيط فقط في معادلة اخي سليم لحساب عدد الشهور بين تاريخين: هذه محاولة: مع المحافظة على الترتيب اذا افترضنا ان A2 هو التاريخ الاحدث (2015/1/5) و A1 التاريخ الماضي (2014/8/5) و كلا التاريخين يشيران لنفس اليوم فأن المعادلة مع تعديل بسيط ستكن: (YEAR(A2)-YEAR(A1))*12 + MONTH(A2)-MONTH(A1) اما في حالة اختلاف اليوم في كلا التاريخين .. فأعتقد ان معادلة ايجاد عدد الشهور ستكن كالتالي: =IF(DAY(A2)-DAY(A1)>=0,(YEAR(A2)-YEAR(A1))*12 + MONTH(A2)-MONTH(A1),(YEAR(A2)-YEAR(A1))*12 + MONTH(A2)-MONTH(A1)-1)

استاذ حسام عندما افتح الملف تظهر عندى هذه الرساله كما فى الصوره

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

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

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