Ali Mohamed Ali

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

عمل ممتاز بارك الله فيك استاذى الكريم

جزاك الله كل خير استاذ سليم كود رائع

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

تم عمل معادلة محل الميلاد من الرقم القومى وهى : =IFERROR(VLOOKUP(MID(F8,8,2)*1,المحافظات!$I$4:$J$31,2,0),"") أما بالنسبة لباقى الطلبات فغير واضحة فعلى اى اساس يتم التقدير والترقية

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

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

أحسنت استاذ سليم عمل رائع جعله الله فى ميزان حسناتك

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

الملف يعمل تمام عليك فقط ادخال الرقم القومى المكون من 14 رقم كما تلاحظ فى الملف يا اهل الخير 000000.xlsx

تفضل اخى الكريم Office Soft.Employ & Salary-Source.rar

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

تفضل 1.xlsm

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

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

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

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

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

بارك الله فيك استاذى الكريم عمل رائع

تفضل وهذا فيديو الشرح https://www.youtube.com/watch?v=TYSxuXtp1B0 البحث بمجرد كتابة اول حرف فى القائمة المنسدلة.xlsx

تفضل لك ما طلبت Test VBA Color.xlsx

يبقى كده من الأفضل رفع الملف لمشاهدة المشكلة عن قرب والعمل على حلها ان شاء الله

تفضل لك كل ما طلبت اما بالنسبة لتغيير الألوان فذلك عن طريق تغيير رقم اللون الموجود داخل الكود طبقا لأرقام الألوان التى تريدها Coloring2.xlsm

جرب هذان الكودان للحماية Sub ProtectAll() Dim sht As Worksheet Dim twb As Workbook Set twb = ThisWorkbook For Each sht In twb.Sheets sht.Protect "123" Next sht End Sub ولفك الحماية Sub UnProtectAll() Dim sht As Worksheet Dim twb As Workbook Set twb = ThisWorkbook For Each sht In twb.Sheets sht.Unprotect "123" Next sht End Sub

تفضل Coloring.xlsm