احمد بدره

تفضل الملف ترقيم تلقائي.xlsx

عليك السلام ورحمة الله وبركاته هناك أكثر من دالة وأنا أرجع الدالة SUBTOTAL مثال لو البداية الخلية B2 فتكون الدالة بهذا الشكل ولاحظ تثبيت أحداهما والثانية غير مثبته ( لكي يتم التثبيت يجب الضغط على مفتاح F4 بعد تحديد اسم الخلية المراد تثبيتها ) ثم السحب نزولاً لأسفل =SUBTOTAL(3;$B$2:B2) وهي نفسها =SUBTOTAL(3,$B$2:B2) تختلف تبع إعدادات الجهاز لديك

عفوًا أخي الفاضل ولكن للاسفادة قارن بين تعديلك وهذا التعديل في الملف المرفق بيان الحالة.xlsm

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

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

أسأل الله العظيم رب العرش العظيم أن يشفيه

رائع بارك الله فيك أستاذنا الفاضل أستاذ سليم بعد إذن حضرتك أرى يجب تعديل بإضافة سطر لمسح المحتويات قبل الترحيل حتى لو أنه كان هناك تعديل لا يستبب في مشاكل فيصبح الكود هكذا Private Sub ComboBox1_Change() Dim R As Integer, M%: M = 5 Dim My_sh As Worksheet Application.ScreenUpdating = False Select Case Me.ComboBox1.Value Case "راسب": Set My_sh = Sheets("رسوب") Case "ناجح": Set My_sh = Sheets("ناجح") Case "دور ثانى": Set My_sh = Sheets("دور ثان فى") Case Else: GoTo End_Me End Select My_sh.Range("A5:t1005").ClearContents For R = 5 To 100 If Sheets("الشيت").Cells(R, 20) = Me.ComboBox1.Value Then Sheets("الشيت").Range("A" & R).Resize(1, 20).Copy My_sh.Range("A" & M).PasteSpecial xlPasteValues M = M + 1 End If Next End_Me: Application.CutCopyMode = False Application.ScreenUpdating = True End Sub Shool.xlsm

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

قم بالذهاب إلى تنسيق شرطي ثم اختر إدارة القاعدة ومن إظهار قواعد التنسيق اختر ورقة العمل هذه لاحظ الصورة ثم الصورة الثانية ثم الصورة الثالثة ثم اضغط موافق لاحظ النطاق من E7 : E1007 بالنسبة للون انظهر الصورة بالمثل النطاق باللون الأحمر طبعًا ممكن بالمثل تختر نطاق لرقم التليفون وتتبع نفس الخطوات فقط تغير رقم 14 في المعادلة إلى 11 وتكتب بدلاً من E7 خلية بداية النطاق

تم عمل المطلوب الرقم القومى.xls

أولاً كان يجب عليك رفع ملف توضح فيه المطلوب ثانيًا يمكن عمل ذلك باستخدام التحقق من الصحة وذلك بتحديد الخلايا ثم الذهاب إلى بيانات واختر التحقق من الصحة يظهر صندوق حواري اختر اعدادت وأكمل كما بالصورة بالنسبة للرقم القومي الطول 14 أما بالنسبة للتلبفون اجعله 11

بعد إذن الأستاذ مهند بالنسبة للخصم في الفورم تفضل الملف.xlsm

اشكرك أستاذ وجيه على مرورك ولكما بمثل ما دعوتما

جرب هذا التعديل لعله يفي الغرض 123.xlsx

عليك السلام ورحمة الله وبركاته جرب هذا 123.xlsx

رائع ودائمًا مبدع أستاذنا الفاضل سليم لي سؤال هل ممكن مسح بناء على اسم المادة المؤخوذة من مواد الرسوب المصنف1.xlsx

بعد إذن الأستاذ علي عندما تقوم باللصق بعد النسخ قف بالمؤشر على أول خلية المراد اللصق فيها واضغط كليك يمين واختر نوع اللصق قيم 123 Pay-mttks_magdi-20181011-082233-2019 - Copy.xls

أشكرك أستاذ أحمد يوسف على تنبيه الأستاذ seddiki_adz أما بعد أخي الكريم seddiki_adz معذرة لطول الوقت فكلنا نعلم أن هذه الأيام الغالبية مشغولون و لك ما طلبت ولكن بطريقة أخرى وهذا العمل من إبداع أستاذنا الفاضل والعالم الجليل أ / عبدالله باقشيير أسأل الله تعالى له ولأهله الصحة والعافية ويعيد عليه هذه الأيام بالخير واليمن والبركات قمت بالتعديل ولكن بصعوبة ليلبي طلبك اظهار قيمة خلية في الفورم2.xls

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

على حد علمي أن الفريم يكون بالجنب ممكن عمل ليبل بدلاً منه اظهار قيمة خلية في الفورم2.xls

للتوضيح انظر الصورة

جرب هذا اظهار قيمة خلية في الفورم2.xls

عليك السلام ورحمة الله وبركاته يمكن ضغطه ببرنامج ون رار ثم رفعه

بارك الله فيك أستاذ علي وكل عام أنت بخير

هل تقصد عدم إظهار رقم المسلسل في التكست بوكس تفضل هذا يمكن حذف الليبل الخاص بالتسلسل وتكست بوكس 1 اظهار قيمة خلية في الفورم2.xls