بوعلام قام بنشر أبريل 30, 2013 مشاركة قام بنشر أبريل 30, 2013 السلام عليكم ورحمة الله تعالى وبركاته تحية عطرة لكل القائمين ورواد هذا المنتدى الكبير أرجوا المساعدة في الملف المرفق المطلوب داخل الملف. الترحيل من جدولين.rar رابط هذا التعليق شارك More sharing options...
جمال عبد السميع قام بنشر أبريل 30, 2013 مشاركة قام بنشر أبريل 30, 2013 أنظر أخى لعله المطلوب ولكن ملحوظة ترتيب ابسلم لم أقم بترتيبها لأنها ستؤدى لخطأ فى الترتيب الترحيل من جدولين.rar رابط هذا التعليق شارك More sharing options...
بوعلام قام بنشر أبريل 30, 2013 الكاتب مشاركة قام بنشر أبريل 30, 2013 السلام عليكم ورحمة الله وبركاته جزاك الله كل خير على المحاولة لكن في طلبي يجب أن تحذف الصفوف التي تحتوي على 0 ويتم الترتيب كما هو مبين في الجول 3 ألف شكر على اهتمامك رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر أبريل 30, 2013 مشاركة قام بنشر أبريل 30, 2013 السلام عليكم الاخ الكريم / بوعلام بارك الله فيك بعد اذن الاستاذ القدير / جمال عبد السميع ... جزاه الله خيرا واثراءا للموضوع ... والي ان يأتيك رد القدير ... الذي بلاشك سيكون اروع بكثير جرب المرفق ... به المطلوب ولكن بالاكواد ... فقط اضغط علي الزر الموجود بالملف ارجو ان يكون هو المطلوب جزاك الله خيرا الترحيل من -SAMAجدولين.rar رابط هذا التعليق شارك More sharing options...
بوعلام قام بنشر مايو 1, 2013 الكاتب مشاركة قام بنشر مايو 1, 2013 السلام عليكم ورحمة الله تعالى وبركاته شكرا أخي الكريم على هذا الحل الرائع لكن المطلوب أن يتم ترتيب الحراس حسب السلم من الأكبر إلى الأصغر 12 . 11 . 10 شكرا جزيلا أرجوا المساعدة رابط هذا التعليق شارك More sharing options...
احمد عبد الناصر قام بنشر مايو 1, 2013 مشاركة قام بنشر مايو 1, 2013 (معدل) السلام عليكم بعد اذن استاذ حمادة جرب هذه كود الاستاذ حمادة مع اضافة سطر للترتيب . Sub SAMA() Dim LastR1 As Long Dim LastR2 As Long Dim LR As Long Application.ScreenUpdating = False Range("L6:p20").ClearContents LastR1 = Cells(Rows.Count, 7).End(xlUp).Row Range("b5:g" & LastR1).AutoFilter Field:=6, Criteria1:="<>0" Range("c6:g10").SpecialCells(xlCellTypeVisible).Copy Range("L6").PasteSpecial LR = Cells(Rows.Count, 12).End(xlUp).Offset(1, 0).Row LastR2 = Cells(Rows.Count, 12).End(xlUp).Row Range("b14:g" & LastR2).AutoFilter Field:=6, Criteria1:="<>0" Range("C15:g19").SpecialCells(xlCellTypeVisible).Copy Cells(LR + 1, 12).PasteSpecial Range("b6:J19").AutoFilter '* Range("l" & LR + 1 & ":p" & Range("p" & Rows.Count).End(xlUp).Row).Sort key1:=Range("o" & LR + 1), order1:=xlDescending '* Application.ScreenUpdating = True End Sub تحياتي و الشكر موصول لاستاذ جمال تم تعديل مايو 1, 2013 بواسطه احمد عبد الناصر رابط هذا التعليق شارك More sharing options...
أبو شرف قام بنشر مايو 2, 2013 مشاركة قام بنشر مايو 2, 2013 استاذي العزيز لدي جدول يحتوي على تسلسل اكثر من 4000 عملية تسجيل معدل لخمس خلايا من E-A ولكن احتاج ترحيل بعض الصفوف الى جدول معين في الصفحة الثانية وبعض الصفوف الى الصفحة الثالثة وهاكذا وعلى سبيل المثال اريد تحويل قيد زينة الى صفحة زينة وحساب علي الى صفحة علي وحساب السيارات الى صفحة السيارات ولكن عندما احدد الخلية او اعمل عليها دبل كلك يعطيني خيارات بأسماء الصفحات للنقل اليها وهذا الموضوع مهم جدا حيث انه طفرة كبيرة بالنسبة لنا حيث ان الترحيل لكل عملية بأستخدام النسخ واللصق اصبحت متعبة وتحتوي على اخطاء لذلك نرجو المساعدة بالخصوص واتمنى اني قد استطعت ان اوصل الفكرة لكم مع تحياتي لجميع المشرفين والأعضاء بالأمنتدى الكرام اخوكم ابو شرف رابط هذا التعليق شارك More sharing options...
عبد الحميد شقير قام بنشر مايو 2, 2013 مشاركة قام بنشر مايو 2, 2013 اللهم اجعل كل ماتقدمونه في ميزان حسناتكم رابط هذا التعليق شارك More sharing options...
بوعلام قام بنشر مايو 2, 2013 الكاتب مشاركة قام بنشر مايو 2, 2013 السلام عليكم ورحمة الله تعالى وبركاته شكرا أخي الكريم وسلمت يداك لكن لو تكرمت وشرحت لي الكود لأن خبرتي قليلة وكيف يمكن إضافة صفوف أخرى لكل الجداول وشكرا جزيلا رابط هذا التعليق شارك More sharing options...
بوعلام قام بنشر مايو 2, 2013 الكاتب مشاركة قام بنشر مايو 2, 2013 (معدل) هل يمكن فعل نفس العمل بالمعادلات للرفع تم تعديل مايو 2, 2013 بواسطه بوعلام رابط هذا التعليق شارك More sharing options...
الخالدي قام بنشر مايو 2, 2013 مشاركة قام بنشر مايو 2, 2013 السلام عليكم ورحمة الله وبركاته جرب المرفق باستخدام المعادلات يمكنك استخدام معادلة واحدة والاستغناء عن الاعمدة المساعدة بعد فهمها في أمان الله الترحيل من جدولين معادلات.rar رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر مايو 2, 2013 مشاركة قام بنشر مايو 2, 2013 السلام عليكم الاستاذ القدير / الخالدي بارك الله فيك دائما مبدع ورائع في معادلاتك كما انت في اكوادك والاروع هو تواجدك بيننا هذه الايام ... برغم قلته بعض الشئ تقبل تحياتي جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
الخالدي قام بنشر مايو 2, 2013 مشاركة قام بنشر مايو 2, 2013 شكرا لك استاذ حمادة عمر اسعدني تواجدي بينكم هذا الاسبوع لقلة ارتباطاتي البركة بكم بالأخوة في المنتدى جزاكم الله خيرا رابط هذا التعليق شارك More sharing options...
جمال عبد السميع قام بنشر مايو 3, 2013 مشاركة قام بنشر مايو 3, 2013 ماشاء الله أستاذى فى منتهى الذكاء بارك الله فيك رابط هذا التعليق شارك More sharing options...
الخالدي قام بنشر مايو 3, 2013 مشاركة قام بنشر مايو 3, 2013 شكرا للمرور والثناء استاذ جمال بارك الله فيك وجزاك خيرا رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان