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

الأمر ليس بالصعب طالما انك تريد هذا تفضل الملف بدون كلمة فقط تفقيط الدرجات.xls

وعليكم السلام عليك اخى الكريم رفع الملف فعموما هذا كود اخر لإثراء الموضوع بعد اذن الأستاذ ابو عيد . تفقيط الدرجات.xls

يثبت عدم عجز الاكسس كما يتخيل البعض اعجبنى جدا جدا جدا احببت مشاركتكم اياه https://github.com/krishKM/Modern-UI-Components-for-VBA

المعادلات تعمل بشكل دقيق ولكن عليك وضع علامة الصح كما بالصورة

وعليكم السلام تفضل 2.xlsm

الحمد لله توصلت للحل وها هو منشور للفائدة

وعليكم السلام -تفضل حساب التاريخ تلقائى.xlsx

لضمان هذه الإشكالية من الوقوع؛ أن نقوم بإعادة الجداول إلى الوضع المعتاد قبل ضغط البيانات وإصلاحها..

تفضل حل بسيط وبدون برامج يمكنك رفع الملف المحمى على هذا الموقع مباشرة وسيتم فك الملف لك -وذلك كما بالصورة الموضحة لك http://www.ensode.net/xls-crack.jsf

تفضل لك ما طلبت بالمعادلات _الأحوال الثانية - نسخة.xlsm

وعليكم السلام كان عليك رفع ملف من البداية لعمل اللازم عليه تفضل كود تثبيت التاريخ تلقائيا.xlsm

الحمد لله === هديتى للزملاء برنامج محمد جابر - كأس افريقيا (مصر) 2019 بالاكسيل كل ماهو عليك تسجيل نتائج المباريات وستحصل على 1- الإطلاع على الجدول 2- الإطلاع على الإحصاءات 3- الإطلاع على الترتيب 4- معرفة البطل 5- الاطلاع على المجموعات وهذا هو الملف كأس_افريقيا_(_مصر_)2019.rar

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

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

الف مبروك استاذ كاسر على الترقية لدرجة خبير

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

انظر للمعايير داخل الاستعلام اوفسنا طباعة.accdb

شكرا جزيلا استاذ @ابا جودى و استاذ @محمد احمد لطفى احسنت بارك الله بكم هذا المنتدى المفضل لدي بسب امثالكم من الاناس الطيبين ممكن الشرح استاذ محمد احمد لطفي

وهذه هي المشاركة اللي اشار لها اخي كاسر ، واللي يتفق معاها اخوي ابو ابراهيم و جعفر

فعلا أستاذ جعفر.. مبارك عليك أستاذ كاسر شارة الخبراء.. أتمنى أن يكون لى معك مشاركات فى المستقبل

وعليكم السلام 🙂 انقر على الكائن بالفأرة اليمين ، ثم اختار تحويل الى جعفر

وعليكم السلام يمكنك استخدام هذه المعادلة =SUMPRODUCT(('بنجلاديش متابعة'!$E$2:$E$92>=$A$4)*('بنجلاديش متابعة'!$E$2:$E$92<=$B$4)*('بنجلاديش متابعة'!$D$2:$D$92="وصول")) العمال .xlsx

مبارك اخي @kaser906 تستحق هذا اللقب .... اعانك الله وسددك

بعد اذن الأستاذ محمد فؤاد لك ما طلبت كما تم مناقشة هذا الموضوع من قبل على هذا الرابط https://www.officena.net/ib/topic/91655-دالة-لعد-الطلاب/ New_Microsoft_Excel_Worksheet_(2).xlsx

ممتاز جدا و فعلا مفيد شكرا استاذ عبد اللطيف

جزاكم الله خيراً إخوتي الكرام على مروركم العطر .. تقبلوا تحياتي العطرة والسلام عليكم.

وعليكم السلام -نورت المنتدى جزاك الله كل خير واحسنت بما انه اول برنامج لك

تفضل SEER.xlsx

احسنت استاذ بن علية كود ممتاز وبعد اذن حضرتك وزيادة فى اثراء الموضوع -هذا كود اخر للحل Option Explicit Sub Inqwayry7() Dim Q1, Q2, q3, FR, TR Dim S_sh As Worksheet: Set S_sh = Sheets("ÇáíæãíÉ") Dim T_sh As Worksheet: Set T_sh = Sheets("ßÔÝ ÇáÍÓÇÈ") Range("A7:j1000").ClearContents Q1 = Range("b2") Q2 = Range("b3") q3 = Range("D2") TR = 7 If Range("b2").Value > Range("b3").Value Then MsgBox "åäÇß ÎØà Ýí ÊÑÊíÈ ÇáÊÇÑíÎ", vbExclamation, "ÎØÃ" Exit Sub End If With S_sh For FR = 7 To 3333 If .Cells(FR, 1) >= Q1 And .Cells(FR, 1) <= Q2 And .Cells(FR, 2) = q3 Then Cells(TR, 1) = .Cells(FR, 1) Cells(TR, 2) = .Cells(FR, 2) Cells(TR, 3) = .Cells(FR, 3) Cells(TR, 4) = .Cells(FR, 4) Cells(TR, 5) = .Cells(FR, 5) Cells(TR, 6) = .Cells(FR, 6) Cells(TR, 7) = .Cells(FR, 7) Cells(TR, 8) = .Cells(FR, 8) Cells(TR, 9) = .Cells(FR, 9) Cells(TR, 10) = .Cells(FR, 10) TR = TR + 1 End If Next FR End With End Sub ولكن بالتأكيد كود حضرتك الأفضل فهو كود صغير وبسيط وادى الغرض بكل كفاءة كشف حساب بين تاريخين.xlsm

وعليكم السلام-تفضل تنسيق شرطى.xlsx

بارك الله فيك وجزاك الله كل خير

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

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

وعليكم السلام التنسيق الشرطى.xlsx

بارك الله فيك وجزاك الله كل خير

بارك الله فيك وجزاك الله كل خير

بارك الله فيكم جميعا كلها حلول ممتازة جزاكم الله كل خير وكل عام وانتم بخير

بارك الله فيك اخى الكريم والحمد لله الذى بنعمته تتم الصالحات

تفضل-ولكن كا ن عليك من البداية رفع ملف تجنبا لإهدار الوقت وشرح لما تريد بالضبط فعليك بتغيير النطاق بالكود لما تريد Sub print_out() Sheets("Sheet1").Range("a2:g100").PrintOut End Sub

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

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

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

ابا جودى @ نبارك لكم الترقية ومنها للأعلى إن شاء الله

وعليكم السلام تفضل Att Apr 2019.xlsx

لف . ألف . مبروك أخي @ابا جودىتستاهل اللقب وبجدارة

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

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

وعليكم السلام ورحمة الله وبركاته 🙂 ويصدق عليه الحديث الشريف : من عمل بما يعلم أورثه الله علم ما لم يعلم 🙂 في الواقع احنا كمنتدى نهنئ انفسنا ، قبل ان نهنئ @ابا جودى 🙂 جعفر

بارك الله فيك

اهلا بك اخى الكريم فى المنتدى الرابط موجود فى اول مشاركة من الموضوع-تفضل http://www.mediafire.com/file/iwmlyw13zdl/بيانات+طبية.rar