سمير نجار

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

السلام عليكم ورحمة الله وبركاته اخواني احمد حافظ وimaginlife الرجاء ما هي المعادلة التي ستكتب في التنسيق الشرطي ولكما كل الشكر السلام عليكم

السلام عليكم ورحمة الله وبركاته اخي imaginlife ما هي طريقة التنسيق الشرطي ؟ ولك كل الشكر السلام عليكم

السلام عليكم ورحمة الله وبركاته اخي احمد حافظ بارك الله فيك أمَا لو كنت أسميت موضوعك ب ( تنبيه عن تكرار رقم او نص ) لكان اوضح وأدل على المضمون تحياتي لك وبانتظار الخبراء للمساعدة السلام عليكم

السلام عليكم ورحمة الله وبركاته بارك الله فيك استاذي الكريم خبور خير كنت قد قرأت هذا الموضوع من يومين والان و منذ ساعتين وان ابحث عنه وظننت ان الموضوع قد حذف لكن الحمد لله وجدته اخيرا" السلام عليكم

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

السلام عليكم ورحمة الله وبركاته اخي mfawaz ارجو قبول مشاركتي البسيطة مع وجود العمالقة امثال ابو اسامة وغيره السلام عليكم 11.rar

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

السلام عليكم ورحمة الله وبركاته استاذي الكريم احمد يعفوب بارك الله فيك وحل اكثر من رائع لو تتكرم بشرح الكود وخاصة هذا الجزء QQ = ActiveSheet.Cells(5555, 3).End(xlUp).Row + 1 كل الشكر لك استاذي السلام عليكم

السلام عليكم ورحمة الله وبركاته بارك الله فيك استاذي الكريم ابو اسامة ورزقنا الله المَلَكَةَ في التفنن في الفيجوال بيزك كأمثالكم انتم الخبراء والمشرفين الرجاء شرح هذه الجزء من الكود x = Sheets("mtf").Cells(Rows.Count, 2).End(xlUp).Row + 1 ولك كل الشكر السلام عليكم

السلام عليكم ورحمة الله وبركاته اخي الكريم nwe4 الترحيل يعمل بشكل ممتاز الى اربع ورقات وانا فقط غيرت في دالة if وان الكود الممتاز لابي اسامة يسمح باضافة شروط اكثر وورقات اكثر اليك الملف السلام عليكم 111.rar

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

السلام عليكم ورحمة الله وبركاته أختي الكريمة الحديثة بارك الله فيك انا فقط قمت بجمع شيء من كود الاستاذ طارق وشيء من كود الاستاذ ابو اسامة وما انا إلاتلميذ مبتدئ واذا لم يتدخل الاساتذة الخبراء أكيد سأقع في حرج فالغوث الغوث إليك هذا الملف المرفق لاحظي الصف رقم 6 مخفي بين 5 و 7 وذلك في ثلاث ورقات ( ورقة1 - ناجح - له دور) تحياتي اخوك سمير نجار السلام عليكم 1000.rar

السلام عليكم ورحمة الله وبركاته اختي الحديثة ارفق هذا الملف الذي حاولت فيه لساعات وبعد تجميع للاكواد من هنا وهناك كانت مشاركتي هذه أرجو ان تنال الرضى واكيد يحتاج الى تعديل المشرفين الاكارم انطري الورقة1 في الاعلى السلام عليكم 100.rar

السلام عليكم ورحمة الله وبركاته اخي الكريم new4 هذا الملف هو ملف الاستاذ ابو اسامة وانا فقط غيرت في دالة if و لم اغير شيئا" من الكود تحياتي اخوك سمير نجار السلام عليكم 11.rar

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

السلام عليكم ورحمة الله وبركاته اخي new4 أنا فقط عدلت في دالة if وطلع معي هذا الملف أرجو أن تنفع مشاركتي السلام عليكم 11.rar

السلام عليكم ورحمة الله وبركاته استاذي الكريم خبور خير بارك الله فيك وفي ميزان حسناتك ان شاء الله تعالى عمل اكثر من رائع هل يوجد شرح مفصل عن عمل هذه الادوات في الاكواد مثل On Error GoTo او set او with او غيرها ولك كل الشكر تلميذك سمير نجار السلام عليكم

السلام عليكم ورحمة الله وبركاته استاذي الكريم خبور خير بارك الله فيك وفي علمك وعملك هل تتكرم علينا وتشرح هذا الكود وخاصة الجزء set و with ولك كل الشكر السلام عليكم

السلام عليكم ورحمة الله وبركاته استاذي الكريم طارق بارك الله فيك وفعلا" طريقة رائعة لفهم الكود الرجاء شرح جزء من الكود لم افهمه وهو ActiveCell.Columns("A:A").EntireColumn.Select كيف يحدد هذا الكود خلايا العمود m ؟؟؟ ليقوم بعد ذلك بمسحها ؟ ولك كل الشكر السلام عليكم

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

السلام عليكم ورحمة الله وبركاته استاذي الكريم ابواسامة بارك الله فيك على سرعة الرد هل يمكن تحديد المكرر في العمود الواحد فقط مثلا"عمود a وطبعا" بالالوان وهل يمكن جعل تحديث الخلايا اتوماتيكي بحيث لو عدلت احدى الخلايا المكررة لالتغى لون الخلية تلقائيا" استاذي الكريم ان هذه الدالة في التنسيق الشرطي =IF(COUNTIF(A:A; $A1)>1;TRUE;FALSE) تعمل بشكل جيد ينقصها فقط الالوان فهل يمكن ذلك؟ وفي النهاية اكيد كودك هو الافضل لان في الأكواد تبرز الابداعات بانتظار الرد السلام عليكم

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

السلام عليكم ورحمة الله وبركاته بارك الله فيكم جميعا" مشرفين وأعضاء استاذي الكريم ابواسامة الرجاء هل يمكن تعديل الكود لتحديد المكرر في نفس العمود a فقط وهل يمكن اعطاء لكل مكرر لونا" معينا" اخي يحيى الرجاء دائما" ارفاق الملف بصيغة xls لكي يعمل على اوفيس 2003 ولك كل الشكر وقد قمت بتطيق هذه الدالة على عمود واحد فنجحت في تحديد كل المكررات =IF(COUNTIF(A:A; $A1)>1;TRUE;FALSE) ولكن هل يمكن اعطاء لكل مكرر لونا" معينا" أرجو الافادة بارك الله فيكم جميعا" السلام عليكم

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