Ali Mohamed Ali

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

تفضل 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

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

عليك بتوسيع العمود ثم عمل كليك يمين عليه واختيار التنسيق يكون رقم

تفضل لك ما طلبت بمعادلات المصفوفة نموذج1.xlsx

هذه معادلات مصفوفة فلابد من الضغط على CTRL+SHIFT+Emter وليس Enter فقط لكى تعمل المعادلة بصورة صحيحة معك

غير كما تشاء فى المعادلة لأن كان عليك من الأول رفع ملف

وعليكم السلام تفضل قائمة العملاء.xlsx

وعليكم السلام تفضل حاصل جمع رقم عشرى ورقم صحيح.xlsx

تفضل 3.xlsx

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

تفضل اتمنى ان يكون كده اخر طلب 2.xlsx

يمكنك تجربة هذه الملفات وجدتها عندى UserFormMenu bar.xls قوائم مخصصة.xlsm