علي فاهم

بارك الله فيك

شرح وافي اخرج الدرر جزاكم الله خيرا وهذا كود آخر للاستاذ خبور نرجو شرح كلماته Sub ترحيل_بشرط() LastRow_1 = Cells(Rows.Count, "B").End(xlUp).Row Range("B9:N" & LastRow_1).ClearContents With Sheets("Sheet1") S = 9 LastRow_2 = .Cells(.Rows.Count, "B").End(xlUp).Row Application.ScreenUpdating = False For QQ = 8 To LastRow_2 If .Cells(QQ, 2).Value = [C5] Then .Cells(QQ, 2).Range("A1:N1").Copy Cells(S, 2).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False S = S + 1 End If Next End With Application.CutCopyMode = True End Sub

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

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

بارك الله فيك وامدك بالصحة

الملف نريد استخراج المسيحيين والمسلمين نريد استخراج الناجحين والراسبين ونريد التقسيم لطباعة الشيت Book2.rar

اخي هادي .. هداك الله الى الجنة بارك الله فيك ... بارك الله فيك وامدك بالصحة والعافية

امدك الله بموفور الصحة والعافية

اشكرك على ردك ولكن هناك طرق كثيرة جدا داخل الاكسيل تحل لك كثيرا من المشاكل ( اقتباس ) هل يمكن ان تفيدنا بطرق التقسيم افادك الله الاستاذ خبور المحترم اعتبر بفتح الباء .. ان الناجح والراسب في العمود التاني لكن لو اعتبرت ان الناجح والراسب في العمود السادس ماذا اغير في الكود ؟ مرة اخرى اشكرك وجاري تنظيم الملف الذي سأرفقه

للرفع

وعليكم السلام ورحمة الله وبركاته زادك الله من فضله وعلمه تمام ولكن اذا كانت البيانات المرحله في عمود اخر غير B ماذا افعل ؟ لو اردت ان اوزع هذه البيانات المستخلصة على اوراق حتى يتم تصويرها على اساس ان الاسماء كثيرة كل كشف 25 اسم وشكرا

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

الاخ خبورحفظك الله ورعاك هذا لو اردنا ترحيل الصفحة كاملة ولكن اذا اردنا استخلاص بيانات معينة من الصفحة و ترحيلها ماذا نفعل ؟ مثل اسماء الناجحين

بارك الله فيك وحفظك من كل سوء

نرجو بعض الروابط الاجنبية بارك الله لكم

جزاك الله خيرا

جاري التحميل وبارك الله لك

للرفع وان شاء الله تفيد في منع التكرار ولكنها لاتمنع تكرار المنسوخ

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

الحمد لله الحمد لله اكون اول واحد يستقبل البطل وقبل ان افتحه اقول إنه عمل مميز مثل اعماله السابقه انا كنت منتظرك من الصباح والحمد لله شكرا

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

الأخ h63 ليس هذا هو السؤال السؤال واضح اسلوبك في الرد جانبه الصواب يحمد الله على ان الله جعلك اخوه فترد بطريقة استفزازية سامحني وسامحك الله

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

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

شعور طيب وجميل ولكن ماذا في الكتاب ؟